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Investment 

Portfolio 

System 



from Personal Finance Systems 



The 33-pagc manual supplied with this system takes you step-by-step 
through the process of creating, maintaining and updating your personal 
portfolio. In addition to giving you complete information about the 
performance of your portfolio, the various sub-programs allow you to test 
investment positions or situations by entering hypothetical data and using 
the analysis features to make comparisons. 



The sub-programs allow you to: 

• Update name, date or market index 

• Add new items to the file 

• Update current price of all items 

• Update individual items by ticker symbol 

• Record stock dividends 

• Record stock splits 

• Delete existing items from the file 

• Display portfolio report index 

• Write data to disk or tape at end pf session 

Both disk and tape versions are supplied on cassette with comprehensive 
documentation $49«95 
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How*s 
love life? 



A little dull around the edges? Routine? 
Predictable? Boring? Maybe all it needs is a little 
Interlude. Interlude is the most stimulating 
computer game ever conceived. It combines 
a computer interview, an innovative 
programming concept, and a one-of-a-kind 
manual to turn your love life into exciting, 
adventurous, delicious fun! 

With over 100 Interludes, you can satisfy 
all levels of interest and desire. Each Interlude is 
fully described in the manual, and the more elaborate ones 

are detailed with regard to settings, props, and mood-enhancing techniques. But we've 
saved a few super Interludes for that very special time when your interview indicates 
you're ready! At that time, you will be introduced to one of several Interludes held secret 
within the computer. (When you learn secret Interlude #99, your love life may never be the 
same again!) Interlude can give you experiences youll never forget. Are you ready for it? 

rr xu TOO or»/T 1 IT -i^Ty-v** $14.95 for cassette 

For the TRS-80(Level 11, 16K)** 

$17.95 for diskette 



Interlude 

The Ultimate Experience. 
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During the summer our programmers wHI be taking a much- 
needed and well-deserved break— therefore, effective July 1 st we 
will be temporarily suspending our HOTLINE service. 

SoftSide Magazine is continually seeking original articles and software for publication. Imagination and 
variety in concept and content are our primary criteria for acceptance. Payment varies wi:'i length, 
suitability, ease of editing and quality. 

Our policies with respect to software purchase are highly Individualized, and offer the programmer 
several options, including one-time publication rights, outright purchase, and royalties on sate of 
prerecorded cassettes. Program submissions should use Radio Shack Level 11 Basic, should run in Level II 
and Disk BASIC, and may not employ coding techniques that cannot be accurately presented in a line 
listing, such as SYSTEM modules and "super graphics" or other hybrid methods. For more Information, 
please write: SoftSide, PO Box 68, Milford, NH 03055. 

SoftSide is published monthly by SoftSide Publications, 6 South St., Milford, NH 03055. Subscription 
rates: USA bulk rate - $18 per year. USA first class, APO, FPO, Canada, Mexico, overseas surface mail 
-"$25 per year. Overseas airmail - $30 per year. All remittances must be In U.S. funds, ^^ail subscription in- 
quiries to: SoftSide Subscriptions, PO Box 68, Milford, NH 03055. Entire contents copyright • 1979 by Soft- 
Side Publications. All rights reserved. 

PLEASE NOTE: TRS-80 is a registered trademark of Radio Shack, a division of Tandy Corporation. 
The Software Exchange is not connected in any way with Radio Shack or Tandy Corporation. 
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MOVIN' ON UP 

Wellk George Blank, your Editor 
for lo these many monttis, has 
moved up to the mysterious 
"Fourth Floor" of our imposing 
Milford, New Hampshire offices. 
No one really knows what trans- 
pires at those lofty elevationsrbut 
If G.W.B. ever comes down and 
tells me, I'll pass the secrets on to 
you... 

"Whooo, are Yooou??", I can 
hear you asking, (as the hookah- 
smoking caterpiggle once asked 
Alice In a similar situation). My 
name is James Garon, late of 
sunny California, with a back- 
ground in TRS-80 programming, 
teaching, mathematics and 
secretary-teasing. 

LOOKING BACK... 

This seems like a good 
opportunity to look back over the 
last few years and see how the 



TRS-80 has grown and evolved 
(not to mention the growth and 
evolution of its users — namely 
us!). Some of you may be relatively 
new additions to the TRS-80 
community, and as such, may not 
be aware of the flavor of those 
early days... 

THE MAKING OF A 
COMPUTER WIDOW 

The afternoon of the arrival of 
our 4K Level I machine was 
exciting to say the least. Having 
waited over three months, we had 
actually decided to cancel our 
order when the long awaited 
phone call came. A reckless drive 
to the Radio Shack store, a big box 
which would barely fit into our 
compact car, a hasty drive home 
(we were so excited that we some- 
how took a wrong turn and got 
lost!), the frantic ripping of card- 
board while the little woman stood 
by In gentle amusement (unaware 
that she was seeing her new "rival" 
for the first time), the setting up 
and plugging In — and the TRS-80 
adventure was in full swing! We 
stayed up until 5:30 AM that first 
night, and at 8:00 AM we were back 
at it. To put It mildly, we were 
hooked! (Please note that the use 
of the word "we" is strictly 
editorial.) 

We soon ran Into the many 
limitations of Level I: only two 
strings, A$ and 8$, no string com- 
parisons, only one array, A(N), just 
26 variables, slow graphics, etc., 
but by gosh. It was an honest to 
goodness COMPUTER, it worked 
— and it was ours! 

The limitations were a challenge 
to the true programmer in us. We 



soon had the LeveJ I simulating 
multi-dimensional arrays and even 
playing tunes over the radio; but 
we had a nagging yearning to 
explore the mysteries and power 
of the recently announced Level II. 
Again the wait began. After the 
promised delivery date had come 
and gone, a trace was placed on 
our order. Meanwhile a new Level 
II was ordered... 

"I LEFT MY HEART IN 
NASHVILLE' 
We found out later that the first 
order had somehow wound up In 
Tennessee, where the local Radio 
Shack dealer sold it to one of HIS 
frantically impatient customers. In 
all, It took FOUR tries before our 
Level II at last arrived. 

Well, it was certainly worth the 
wait. All that computing power at 
our fingertips; even machine lang- 
uage subroutines! Of course, It 
took many months to become 
comfortable with all the features of 
the new language, and the abbrev- 
iations of Level I were missed for 
many weeks, but the new possib- 
ilities were endless. INKEY$ alone 
would have been worth the price. 
WANTED: NEW MONARCH 

TO RULE ANCIENT 

SUMERIA. NO EXPERIENCE 

NECESSARY 

Back then, almost every pro- 
gram that came aldrvg seemed fas- 
cinating. HAMMURABI, copied 
from a book of games, engaged 
our attention for hours, even 
though it had no graphics and 
scrolled up the screen like teletype 
paper. The level of expectation of 
today's user is much higher. Not 
many of those early programs 
have withstood the test of time. 
Most are gathermg dust on a shelf 
somewhere. 

One of the few exceptions was 



STARTREK by Lance MIcklus. It 
came on strong, surpassing in 
quality most other games available 
at the time. (It was by far the best- 
selling piece of software at TSE.) 
The final tribute to this remarkable 
program was paid last month with 
the publication in SoftSide of 
STARTREK III.4. (A further 
measure of the value of this 
program can be seen by com- 
paring the cover price of that issue 
with any other to date.) 

Another prime example Is 
SANTA PARAVIA EN FIU- 
MACCIO by our own George 
Blank. With its excellent graphics 
and sophisticated, simulation, we 
discover what HAMMURABI was 
meant to be, but never achieved. 
(While SANTA PARAVIA bears the 
Instant Software label, we are 
proud to announce that it has 
returned to the fold, like the Pro- 
digal Program, and is now 
available from TSE.) 

Of course. Level II was not the 
end of the story (although there 
are many who feel that the Level II 
16K machine was the utiimate in 
reliable computing power). With 
TRS-SOs now available off-the- 
shelf in many Radio Shack stores, 
the wait began for Interfaces and 
Disk Drives. 

When this latest patient wait 
came to an end, many of us found 
that our troubles were just 
starting. Strange problems were 
reported with the Interface; one 
solution after another emerged 
from Fort Worth: The Buffered 
Cable, the Twisted Pair, etc., each 
attempting to rectify some newly 
discovered design problem. 
"DON'T BLAMETOUR 
DRIVES..." 

When the dust had settled from 
all this, and we got our disk drive 
running, we found that the DOS 
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(TRSDOS 2.0 or 2.1) had a lot of 
errors and omissions. Just as 
some customers had almost 
decided that constant rebooting 
and clobbered files were just 
cause for junking the entire 
system, we began to see those 
NEWDOS ads which offered hope 
that It might not be the fault of our 
drives after all, but a problem 
which could be solved once and 
for all by changing to NEWDOS 
from Apparat. 



Finally the TRS-80 had become 
a viable system even in the bus- 
iness environment. (Even Radio 
Shack has finally come out with a 
superior piece of software in 
SCRIPSIT— outpenclling PENCIL 
at 2/3 the price.) 

With the announcement, just 
weeks ago, of NEWDOS/80, we 
find ourselves about to enter into 
what promises to be an amazing 
decade for our special computer. 



a/h(MS 




FOR MORE ADVANCED ADVENTURERS: 



» SCOTT ADAMS' ADVENTUflE! 

Marooned at the edge of the Galaxy you come across the ruins 
of ancient alien civilization, complgte with fabulous treasures 
and alien technologies. Can you collect the treasures and 
escape or will you be forever marooned ... teveril, 16K $ll.95 

6 Scxith Street, Box j68Mlfoi^,NH(m$5 MB-673--5lU.,:^^K 





m^ ^9.95 IM Level n tape $14.95 32K i 
iokwyoa can coBtinac to play this popular arcade j 
even after yon ran out off qnartersi Sli<»ot down the 
invading aliens, but protect your guns from their honibs. 
Great SOUND AND GRAPHICS! (Si»d wm^m^rmm «>t«».i mmttmm^y 



To order call TW Softwan Exchaafl* ToS-Fim 1-8M.2SS.17M 



For the thousands who have enjoyed 
X-Wing Fighter, X-Wing II presents 
a tptally new element in the game! 

x-uiinij II 

by Chris Freund o 



■^ 1^ ■ ■ You are Pilot 
I I U II of an X-Wing 
o fighter ... 

Your Mission, 
Destroy the 
Death Star! 

Where X-Wing I left Death Star looming On the 
screen, X-Wing 11 lets you guide your fighter into the 
trench, find the exhaust port, aim and fire— all the 
while avoiding enemy fighters. Excellent graphics, 
12 levels of play, and^xtensive INKEY$ commands 
make this one of our most exciting "real-time" 

,''"""' Level II, 16K - $9.95 



nffjm The Software Exchange 

^^X^ 6 SOUTH ST., MILFORO. UH 03055 673-6144 



Magic from 

Leo Christopherson 




Bee Wary.. 



This fast-paced real time action 
game is a contest between a 
Bee operated by the player and 
a Spider operated by the com- 
puter. Machine language 
subroutines but loads as Level 
II for easy operation. $14.95 




Snake Eggs.. 



Here is a computerized 
reptilian version of 21 complete 
with arrogant snakes and 
appropriate sound. Level II, 
16K $14.95 



mm 



Android Nim.. 

The newest version of TRS-80's 
first animated graphics 
game— Android NIM~now 
with more animation and 
sound! Level II, 16K $14.95 




Life Two... 

Two in one: Game of Life, at an 
astounding 100 generations a 
minute, plus Battle of Life with 
animated creatures and sound. 
Level II, 16K $14.95 



The Saitware Exchange 

6 South Street, Box 68, Milford.NH 03055 
TOLL FREI 1 -800-258-1 790 pn nh can 8735144) 
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Create, detx^document & 
modify-SWAYS 



UTILITY 



FROM NEPENTHE 



The UTILITY program consists of five modules to assist you 
in the creation and debugging of programs, the preparation of 
program documentation and the modification of program files. 
With UTILITY, you can: quickly locate any string of characters 
in your program, change any strings within your program, 
produce a line number cross-reference on screen or printer, 
select from three degrees of program compression, create a 
formatted, "structured" line listing. 
UTILITY Is evaleble on diek for $29.96 

Call 1-800-258-1790 (in N.N. 673-5144) 



Add a whole new 
dimension to 
your computer ! 




^M 



_^ Games and 

programs come alive with 
ser sounds, bounces, clicks, 
sirens, bird calls, music notee tunes 
and whatever else your imagination 
dreams up. Supplied with three demon- 
stration programs on tape, attractive amplifier 
with cable for direct hookup to your cassette 
recorder (no modification required) and complete 
instructk>ns for creating your own sounds and tunes (including 

a 5-octave organ). 
Ul SOUNDWARE MfiQ your TllS-aO lo Ufa for $24.99, Level II, 19K 

iSiMI 



9 SOUTH ST.. MILFORD, N.H. OaOSS (903) 973-6144 




PRINTING 

CALCULATOR 

PROGRAM 



by D. L. Morrow 



With tax time upon us and my 
old adding machine giving up, I 
decided to put my TRS-80 to work 
in its place. The result is this 
program. It is written to use a 
Quick Printer, but will also work 
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without it. As written, 4K bytes of 
memory are required to execute it. 
When the remarks are removed it 
should run in a Level II 4K system. 

"Printing Calculator" will allow 



the TRS-80 to function as an 
adding machine, but with the 
added features of a calculator, 
such as division and mult- 
iplication, and allow up to eight 
totals. An added feature is that you 
can put titles (Headings) with each 
total. Examples might be; Medical, 
Interest, Taxes, etc. You also can 
reuse or recall any one of the eight 
totals for later use. 

When the Printing Calculator 
program is first RUN the printer 
status is checked by statements 
625 to 640. At this time variable P is 
set to or 1 with = no printer 
output. Next the program will 
display its Title followed by a list of 
the "modes" which it can perform. 

The first Input required will be to 
select one of the modes. This will 
be entered in response to the 
display of "ENTER MODE 
The only inputs accepted are the 
characters displayed in the MODE 
column. Statements 195 to 260 use 
the INKEY$ function of BASIC to 
input the mode character and then 
go to the first routine after 
displaying the active mode flag 
"**" to the right of the entered 
mode character. This Is done by 
statements 140 to 155. 

It is suggested that the first 
mode selected be H. This is to 
enter a heading or title to the Total 
you will be using. When this mode 
Is selected, statements 535 to 555 
will request an input by displaying 
"ENTER HEADING (#.TITLE)". 
An example might be ( 1 , TAXES ). 
This would place the title TAXES 
to the right of the first total column 
and print the Heading TAXES on 
the printer. Now you enter your 
amounts via mode A. 

When mode A Is entered the line 
" ENTER VALUE " will be 

displayed. Only numeric values 



will be accepted by statements 270 
to 300. As each value is entered it 
will be printed and added to the 
total currently selected; also the 
last entry is displayed to enable 
you to keep track of your entries. 
After all of the desired amounts 
have been entered pressing the 
ENTER key only will return to the 
ENTER MODE feature. 

Mode M (subtract) will function 
the same as mode A, except the 
input value is subtracted from the 
selected total and printed on the 
printer followed by "-". 

Mode X (multiply) will multiply 
the selected total by the value 
entered,' then display the new 
total, print a Subtotal followed by 
the value entered, then the new 
total, and return to enter mode. 

Mode D (divide) will divide the 
selected total by the entered value, 
then perform the same operations 
as mode X. 

Mode % (percent) requires only 
a numeric value which will then be 
converted to percent. A Subtotal 
will be printed followed by the 
entered value and the computed 
percentage. The percentage will 
also be displayed to allow it to be 
used if no printer is on. Statements 
500 to 525 are used for this feature. 
. Modes S and T both just print 
the selected total only followed by 
their respective letter, then return 
to mode selection. 

Mode R (recall) is used to select 
the current total. At run time, this is 
number 1 , "HI ". When this mode is 
selected the line "ENTER RECALL 
HEADING # " is being displayed. 
Entries now can only be values 1- 
8. After your selected entry, the 
selected total pointer (left arrow) 
on the left side of the display will 
now point to the current or active 
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total, to which all future modes will jhis program was written to use 

^PP'y- the RS Quick Printer In 40 

The final nriode P was added to character per line mode. The 

allow the printing of all the totals divide and multiply calculations 

and headings (statements 590 to are rounded off to the nearest cent 

620). by statements 480 to 490. 



15 ' PRINTING CnCULRTOR PROGRRH FOR TRS 88 

28 ' BV D HORROU RLBUQUERQUE NH JflN 1988 

25 ' <rWi' BE USED HITHOUT fl PRINTER ) 

38 ' *«: VflRIflBLES ♦* 

35 aS:aEflR<1888):G0SUB625:F0R H=l TO 688:NEXT:CLS 

48 fl=8:S=8:H=8:D=e:T=8:V=8:L=V:H=l:X=H:C=8:Ki:=8 

45 T*="-:I$s":R$»":LI=STRIN(»<68,32) 

58G0SUB65 

55G05UBi95 

68 GOTO 58 

65 ' *»* HENU FEfmjRES DISPLfiV ** 

78GD5UB148 

75 PRINT88>' PRINTING CRCULRTOR PR06R 

AH ■ 

88 PRINT! i2&"iTflB<6)i*** NODE •;TI«(38)'TITLES*iTflB(58) "TOTAL 

S**" 

85 PRINTHKDi TflB(6>; 'fi = flDO'i TflB<25)i 'HI » M»<l)iTflB<5e)iT( 

1) 

98 PRINTM*<2)i TflB<6)i»K = aJBTRflCT";TflB(25)i"H2 « M»(2)iTflB<5 

8)jT<2) 

95 PRINTHfG); TflB<6)i"X = HULTIPLV"; TflB<25)i 'HJ « "iH«3)iTflB<5 

8);T(2) 

188 PRIMW(4);TflB<6)j"D « DIVIDE*iTflB<25>i"H4 « ";H»<4)iT«08) 

iT(4) 

105 PR!Nnil(5)j TRB<6); '^ ' PERCEMT'i TRB(25)i 'HS * *i H»5); Tfe(9B 

)iT<5) 

118 PRIMIW«6)i Tf»<6)i'T = TOTflL"j T«<25)i "H6 « •{H«6>iT«OB> 

iT(6) 

115 PRIMTI!l(7)j TflB(6Xi "S » SUBTOTHL'j TflB<25)j "H7 » "i H»<7); TIW5 

8)iT<7> 

120 PRINTHK&>;Tffi(6);"H » HEff>ING'';TnB(25>;'HB * ■iHt(8>iTnK9e 

);T<8) 
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125 PRlNTW(9)i TflB<6); "R ' RECflLL TOTAL (Hl-^)" 

138 PRIHTM*<18)}TPB<6>; "P = PRINT TOTALS I HD«>INB5'i 

135 G0SUei65:RETURN 

146 ' ** SET ACTIVE FLflG ** 

145 FOR »{=1 TO 18 

158 IF flK=« THEM H»(fK)="WELSE »<(«>=" " 

155 ffXT fK:REnjRN 

168 ' ** SET TOTAL POINTER ** 

165 FOR H=15614 TO 16382 STEP 64 

178 IF H=(15488*<64«H>+62> THEN 175ELSE 185 

175 POKE H93:G0T0185 

188 POKE H,32 

185 NEXT:RETURN 

198 ' 

195 ' ** HENU INKEV ROUTINE ** 

288 PRIHT8832.LSJ :PRINT8832, "ENTER HOOE O ': 

285 I$»INKEV$:IF 1*="" THEM 285ELSE 218 

218 IF Ils-A' THEN H=1:G0SUB65:G0SUB 318:RETIIRN 

215 IF I$=-«'THEN H=2:Q0SUB65:Q0SUB335: RETURN 

228 IF I$="rTHEN H=3:G0SIB65:G0SUB368: RETURN 

225 IF I$="D"THEN HM:G0SUB65:G0SUB445: RETURN 

238 IF I*=TTICN H=5:«i0SUB65.GOSUB495. RETURN 

235 IF I$=»T"THEN H=6:Q0SUB65:G0SUB428: RETURN 

248 IF I*="S*THEN H=7: 0050865 :G0SUB488: RETURN 

245 IF I$="H" THEN H=8:G0SUB65:Q0SUB535: RETURN 

258 IF I*="R"THEN N=9:GQSUB65:G0SUB565: RETURN 

255 IF I$="P" THEN «=18:G0SUB65:G0SUB595: RETURN 

268 RETURN 

265 ' 

278 ' ♦** INPUT VALUE ROUTINE ** 

275 V$=" :PRINT8832, L$; :PRINT8832, "ENTER VALUE » "; : IW>UT V$ 

288 IF V*="" THEN 38eELSE285 

285 IF ASC<V$)<46 OR ASC(V$»57 THEN 275ELSE 298 

298 V=VAL<V*>:L=LEN<V$) 

295 PRINT8896, "LAST ENTRV •; V*i : RETURN 

388 PRINT8896Ali : RETURN 

385 ' 

318 ' ** ADO NODE ♦* 
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315 aiSUB278:IF V*=" THEN RETURM ELSE 
329 T<H)=T(H)+V GOSUBSe.IF P=8 THEM 3i5ELSE 325 
325 IF P=l LPRINT (KING 'Miiimi, Mi. M'lVtOlTCmS 
338 ' 

335 ' ** SUBTRflCT WOE ** 
346 G05UB278:IF Vf^-'THEN RETURN ELSE 345 
345 T(HM(H)-V.G0SUB88:IF P=e THEN 34flELSE 358 
358 IFP=1 LPRINT USING-IMiiiiM, Mt. If; Vi :LPRINT' -VG0T0348 
355 ' 

368 ' ** HULITPLV HOOE ♦* 
365 a»lB278:IF V*="" THEN RETURM 
378 IF P=l G0SUB488 

375 T<H)»T(H)*V:G0SUB488:(j0SUB88:IF P^ THEN 39eELSE 388 
388 LPRINT CHR*(i5>i TflB(15-L); "X"; V 
385 LPRINT CHR$a4):V=T(H):G09JB675 
398PRINT8e96>L$;:RETURN 
395 ' 

488 ' ** PRINT SUB-TOTAL «* 
485 IF P»8 THEN RETURN aSE 418 
418 LPRINT USING 'MMNiii, Hi ii";T(H)i: LPRINT" S* 
415 RETURN 

428 ' ** PRINT TOTAL ** 
425 IF P=8 THEN RETURN aSE 438 
438 LPRINT USING "Hiiiiiii, Mi. li"; T<H)i :LPRINT* T" 
435 LPRINT" "-.LPRIMT" ":RETURH 
448 ' 

445 ' ** DIVIDE NODE «* 
458 (J0SUB278:IF V*=""THEH 478ELSE 455 
455 Q0SUB488:T<H)=T(H)/V:Q0SUB488:IF P=8 THEN 478 
468 LPRINT CHR$(15)iTAB<15-L>i"D';V 
465 LPRINT (»Rf(14):V>T(H):G0SUB675 
478PRINr8e96,L$i:RETURN 
475 ' 

488 ' «* ROUND DFF TOTAL ** 

485 IF <T<H>*18e)-IMT<T<H)*188». 5 THEN T<H)=T<tt>+. 81 
498 T(H>»(INTa(H)*188Vie8) :G0SUB88:RETURN 
495 ' 
588 ' ** '/! PERCENT NODE «* 
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585 G0SUB278:1F V$«"" THEN 525ELSE 519 

518 V=V/i8e: V=V*T(H) : IF P=l THEM 515ELSE 525 

515 LPRIMT CHR»(15) :GOSUB40e:LPRIHT a«*(14) 

528 LPRINm; " 7. ''; :LPRIHT USIHB "«, «#. «#t"; V 

525 PRlHT§896,V$i."JJ = •,¥,•« "i : RETURN 

538 ' 

535 ' ** HEADING ROUTIIC ** 

548 PRINTI832. "ENTER HEfDIWi < t , TITLE )"i: INPUT H,H»<H> 

545 IF H<1 OR \m THEN S4eELSE 5S8 

558 IF P^ THEN S55aSE LPRINT Tie(5>jHI(H) 

555 T<H)=8.PRINT 8832, Ui :RETURN 

568 ' 

565 ' «* REOU HODE ♦* 

578 PRINTie32,L»i:PRINTie32. 'ENTER RECdL HEWING i'i 

575 INPUT H :IF Ha OR H>8 THEN 578ELSE 588 

588 PRINTK32,L$i: RETURN 

585' 

598 ' ** PRINT TOTALS t HEADINGS ** 

595 IF P>8 THEN RETURN aSE 688 

688 FOR flK^ TO 18 

685 IF T(ASi)>8 THEN 628aSE 618 

618 LPRINT USING ' H II HH ,«t. WiUfCi): :LPRINT ' *; 

615 LPRINT ■ ;\»<m 

628 rCXT AK:RETURN 

625' ** PRINTER STATUS CHECK ** 

638 P»PEEK(14312):IF P>2S5 PRINT-PRINTER NOT ON VP>8:RETURN 

635 IF P*191 THEN PRIHT-PRINTER NOT SELECTED" :P»8:RETURN 

648 LPRINT CHRI(38):IF P»63 THEN P^l.RETURN 

645 ' 

658 ' ** PRINT CATAGORV ** 

655 ' ENTER WITH DATA IN T$ 

668 L<EN(TI):LPRIHT TAB(15-L)jT»: RETURN 

665 ' 

678' *» PRINT VALUE ** 

675 ' ENTER HITH VALUE IN ' V ' 

688 LPRINT USING 'IliftiMii. IM. if"; V 

685RETURN 

698 END 
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moQir TOW 



by Scott Adams 



Scott^s long-awaited 9th adventure is here! 
Thirteen treasures are hidden somewhere in 
the GHOST TOWN. Youll need more 
resourcefulness than ever to find them before 
sunset. Be ready for a town full of surprises 
and some REAL ghosts! Bring along a 
sense of humor, but be alert for 
danger as well. If you live so long^ you 
MAY learn the answer to the 

tantalizing question: 
"What goes on 
in the saloon 
after dark?" 



Level 11, 16K Cassette $14.95 



JheScHware Exchange 

6 SOUTH ST.. MILFORD, N.H. 03055 (603) 673-5144 
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Tired of Disk Errors? 

Stop blaming your drives... 

Fix YOUR DOSII 



NEWDOS 



NEWDOS, by Appirit corrictt ovtr 70 trrort and omtsslont In TRSOOS Z1 ind dMc BASK^. ytt thty art 

compittaiy compatlMtt ^ograms SAVEd undtr tithtr systom natd no modlflcctfon to work wHh ttw 

ottitr. Ukf goino from Lavtl I to Uvol II: mora powar. convanlanoa and tpaad. Uaa all DOS commands 

(DIR. REE. REHAME. COPY ate.) from BASIC. AUTO LOAD and RUN a BASC program from powar-up. 

produce vartaMe and constant cross reference taMas. OPB< ^'' to add to the end of a sequenttal file, 

tend wliatavtr Is on the Kreen to your printer, even ki DOS tereat for DIR), renumtter BASIC programs, 

md more... Futly documented; avallahle on disk for only Mm 

NEWDOS PLUS 

Aa of M above PUJS: Edltor/Aaeemtrter for dtek. Z« DIsaseamMer. LMOFFBET to reloc^ 
SYSTBI tapee to disk. Level I bask: language wtth disk I/O. DIRCHECK to check and UST disk dtrect 

SUPBIZAMIaplay/print/modKy any kicaUon In RAM or on disk (worth the price of tie entire package 
when you resurrect that accMentalty KILLed fllel). NEWDOS^ on disk with documentatkm, lust NUL 

NEWDOS/80 

BrMd new from Apporat, their moot powetful DOS ever. EVERYTHIN6 ki NEWDOS and 
NEWDOS^ and more: Variable length records (up to 4006 bytas). mli or mMch your disk 

drives: as, 40 and 77 track drivis can be ueed In any combination— even with S Inch 

drtvee. new security boot-up eequence makaa It Impoeaible for the unauthorized to BREAK 

or LIST. -DOS R8M)r and ' fEAOr need never Mpear. enhanced RENUMBBt allows 

relocation of subroutkies. powsriulprogram CHAIMng, option to PRINT on dtopiay and 

printer simultaneously, execute DOS commands— from OOS-wKhout dishirtiing your 

resident BASICprogram. M the 'DOS of the Bghtles' to work for you. On disk, wfth all 

documentation il4Ue 



6 SOUTH ST., MILFORD. N.H. 03065 (603) 673-6144 
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NUMBAGELS 

by Peter Krisch 




The computer will randomly select a 6-digit number with no two digits 
the same. Digits may range from to 9. Try to guess the number in as few 
turns as you can. 

At the prompt of the computer, enter each digU one at a time In the 
order you think the computer has chosen them. Since no two digits in a 
number are repeated, you must enter five different digits. The computer 
will also not choose as its first digit. 

The computer will provide clues below your current guess. If a digit is 
in the correct position, the computer wiJI print G for each one. If a digit is 
In the wrong position, but in the number, the computer will print R for 
each one. If you repeat a digit during a turn, "ERROR" will be printed 
across your current position and you lose that turn. 

If you wish to give up on a particular number, enter a as your first 
guess that turn. The computer will keep track of your games, number of 
turns, and games 'Skunked' (didn't guess the number). 



1 ' NUHBflGELS 

BV PETER KIRSCH 

DEC 1978 
REVISED MOV. 1979 
VERSION 12 
5 CLS:RflHD0H:PRINT8488. "NUHBRGaS" 
18 PRIMT8529, "DO VOU HflNT RULES (V, H)?" 
15F$=INKEV*:IFFI=""G0T015 
28 IFF$O"N"G0T025 
23 0010288 
25 CLS:PRINT§192. "THE COMPUTER HILL RflNDONLV SaECT fl 5-DIGIT HU 

MDCD UQ TUQK 

38 PRM-DIGITS M SflHE DIGITS HHV RflNGE FROH 8 - 9 TRV TO 
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GUESS THENUHBER IN RS FEH TURFS flS VOU CRN. " 

48 PRINT :PRINT"flT THE PRWT OF THE COMPUTER, ENTER EflCH DIGIT 

NE ftT ft TINE' 

58 PRINT"IN TWE ORDER VOU THHK THE COMPUTER HRS CHOSEN THEN. V 

OU DO HOTHRVE TO PRESS =ENTER=. SINCE NO THO DIGITS IN fl NUHBE 

R ARE" 

78 PRIHT'REPERTED, YOU BUST ENTER FIVE DIFFERENT DIGITS. THE CO 

HPUTER' 

88 PRIKT"HILL ALSO NOT CHOOSE 8 RS ITS FIRST DIGIT. " 

98 PRINT :INPUT"HITENTER"iB$ 

188 CLS:PRINTftL92, "THE COMPUTER HILL PROVIDE atES BELOH mXi CO 

RREHT GUESS" 

118 PRINT"IF ft DIGIT IS IN THE CORRECT POSITION, THE COMPUTER HI 

LL" 

128 PRINT"reiNT C FOR EfCH OC. IF ft DIGIT IS IN THE HRONG PO 

SITION," 

138 PRINT'BUT IN THE NUMBER, THE COMPUTER HILL PRINT R FOR EflC 

HONE." 

148 PRINT :PRINT"VOU HRVE IF TO 24 TURNS TO GUESS THE COMPUTER SE 

LECTED NUMBER " 

158 PRINT"TURNS HILL HOVE FROM LEFT TO RIGHT ACROSS Tt£ SCREEN I 

N GROUPS" 

168 PRINT"OF FOUR. ".PRINT: INPUT"HITEHTER"iB* 

178 aS:PRINT8192, "IF VOU REPERT fl DIGIT DURING R nWJ, E R R 

R HILL K" 
188 PRINT"PRINTED ACROSS VOUR CURRENT POSITION AND VOU LOSE THRT 

TURR" 

198 PRINT:PRINT"IF VOU HISH TO GIVE UP ON ft PRRTICULfK NUMBER, E 
NTER fl 8 RS VOURFIRST GUESS THAT TURK THE COMPUTER HILL KEEP T 
RACK Cf VOUR" 

194 PRINT"GAMES, NUMBER OF TURNS, AND GAMES 'SKUNKED' (DIDN'T 
GUESS THE" 

196 PRIMT'NUBER). " :PRINT : INPUT"HIT ENTER TO PLflV"i B* 
288 CLS:fl=64:V=V+l:U=e:ft$="£ R R R" 
285 C*="NEXT SET. ENTER FIRST DIGIT. " 
218 F=RND<9) :G=RII>(18)-i:H=RND(18)-i: I=RM)(i8)-i: J=»l)<ie)-1 
228 IF(F=6)*<F=H)*<F=I)*<F=J)THEN218 
238 IF(G=H)+(G=I)*<G=J)TICN2ie 
248 IF(H=I)*<H=J)+(I=J)THEM218 



ai 



245 PRIMT'G ft H E 'i VrPRIMT"? ? ? ? ?% :PRIKT»68. "STflRT GflHE. 
ENTER FIRST DIGIT. '; 

246 V$=INKE«:IFVf=«*T»l246aSECLS:X»8:V=8:(i0TO3e5 
386 X=e:Vs8 

383 V$=III<EV$:IFVI="60T0383 

385 K-VH.(V():IFK>«»T078e8 

316 IMHl:PRirfrifl Ki :PRINT6%1> 'ENTER SECOND DIGIT"; C(K$(31)i 

328 V»sINKEV$:IFV»="Q0T0328 

322 L«VI1(VI> :G0SUM888:PRINTIflL : ia=4(TNEN188eELSEPRINT696i, 'E 

KTER THIRD DIGIT'; CW»(31); 

338 VI=IM(EVI:IFV>»"G0T0338 

333 Jt»VflL(V») :G0SUB88e8:PRINT8ft> H; 

335 IF(N»LH(INOT>€N28eeELSEPRINT8%i. 'ENTER FOURTH DIGIT'jCW* 

<31)i 

340 «=iriCEV»:IFV»»"e(»T034e 

343N:4RL(V$>:GQSUB8ee8:PRINr»lN; 

345 IF(N»HH(N4.H(»4()T)€K38eeELSEPRINTe%l, "ENTER LflST DIGIT'; 

ai»(3i); 

398 VtsIiKEV(:IFV$«"G(mB58 

3S3 »:VfL(V»):G0SUB8ee8:FRINTmO; 

355 IF((NO^((HIH<(H.}4((N(>THEN48e8ELSEPRINTiXl,C»; 

3£8 IFK:>mfMK>«^ 

378IF<K=6)+(K»H>*<K=I)*(K»J>VsV*l 

388 la^GnEMisX^i 

398 IF<L=F)*(L=H)*(L=IHa«J)V»V»l 

488 IFN4miNKBX4i 

418 IF<H»f)+<N»6>+(N=I>+0W>V«V*l 

428 IFNsITKNK^^XH 

438 IF(H=F)*<H=G)*(N=«)+<N=J)V=V*1 

448 IF0«JTHENX=X+1 

458 IF<0=F)+(0=e)*(0=H)+(O=DV=V*l 

468 IF(X»8)*(V=8)GOT09888 

478 iFx^gooToeese 

475 B=8 

488 IFX»«GGT0528 

498F0RT=1T0X 

518 nm 

515 IFV»eQ0T(l658 
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528 FCRT=lT(}y 

538PRIMT§ft*68^"R'.B=B*i 

548ICm 

558 rHHo 

560 IFU=20fl=192 

578 IFlHefN328 

588 IFl>^€erN48 

599 IFU=8efl=576 

€88 IFlM8ei)s784 

658 IFIM2eG0T0758 

788 G0TO388 

758 PRINTf96e.CHRI<21>j :F0RZ»iTOS88:NEXT2 

888 PRlHT8e?7,'GflNE OVER! 'i 

885 PRINT'THE CODE HflS: "iFi","i& ",";»•, Mi'* 'iJ 

818 H=H+24:D=D*1 

828 PRINT^Sea^'EKTER S FOR SCORE; ENIIR R FOR HtUS; ': 

838 PRIHT'EHTER P TO PLfiV fBRIN'i 

833 I$=INKEV*:IFI$="G0T0822 

840 IFI$=«S"THEN588eELSEIFI«=-R"THEN25ELSEIFI*=»P"TIOC8flELSE833 

1888 PRINTm-LftIi :PRINT896LC(j :fN)fl2:tHH3:PRIt(TW. "; :G0T056 

8 

2888 PRIMTW-iflf; :PRIMTW61. C$i :R=fttl8;U=U+2:PRINT8e,"i :G0T056 

8 

3888 PRINT»-5,ft$i :PRIHre96LC$; :ft=flt8:U=U*l:PRINT88,''"i :60T0568 

4888 PRIHT8R-7iR(/ :PRIKT896LC»; .fNM.PRINTeOi"; :GOTO560 

5800 CLS:PRINT826.''V0UR SCORE' 

5858 PRINT0164.*flVERRGE TURNS" :PRINT9i84>"GflrCS'' 

5188 PRINT8193, •GfltES PLflVED" :PRINTe212> 'TOTflLTURNS' 

5258 PRII*I8238, "PER GflHE* 

5488 PRIHT8247, "SKUNKED" 

5425 PRIHT826LV 

5426 PRINT8279.H 

5427 P=H/V:PRINT8296,P 
54S8 PRINT83i3,D 
5SO8PRINT8469."";:(iOTO830 

6088 PRINT«H57,"R I 6 H T":lHWJt^:G0T0828 
7888 PR1MT8897, "VOU GfiVE UP! "; :G0T0 885 
8080 U=U+1:(NH2:RETURN 
9088 PRINTeiH57, "H R N 6*:fNH6:G0Ta66e 
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LIST 


OUR 




TRS-80 COMPUTERS: 


PRICE 


PRIpE 




Level II. 4K 


$619.00 


$559.00 


TO ORDER 


Level II, 16K. no keypad 
Level II, 16K. w/keypad 
EXPANSION INTERFACES: 


849.00 


669.00 
749.00 


CALL TOLL- 


COMM-80 Interface 
Expansion Interface, no RAM 


299.00 


179.95 
269.00 


FREE 


Expansion Interface, 16K RAM (NEC) 


448.00 


369.00 


Expansion Interface. 32K RAM. (NEC) 
DISK DRIVES: 


597.00 


459.00 


800-258-1790 


Percom, TFD-100. 40-track 
Percom. Dual TFD-100's 


399.00 
795.00 


389.00 
775.00 


(in NH call 


Percom. TFD-200. 77-track 


675.00 


650.00 


Percom. Dual TFD-200's 


1350.00 


1300.00 




CompuThink, Dual Drive. Dual Sided 




1295.00 


673-5144) 


DISK DRIVE ACCESSORIES: 








2-Drive cable for TRS-80 


29.95 


29.00 




4-Drive cable for TRS-80 


39.95 


39.00 




Percom Data Separator 




29.95 




Extender Card 


15.95 


15.00 




PRINTERS: 








Centronics 730 


795.00 


719.00 




Centronics 737 


995.00 


895.00 




Centronics 753-2 


3196.00 


2695.00 


^nsm^^nt ^1^^ 


^ Centronics 779-2 


1559.00 


995.00 




L, RS Quick Printer II 


219.00 


209.00 


^H^m ^^^^^^^^ 


m RS Line Printer III 


1960.00 


1813.00 


^^^gm ^^^^^^^^ 


M NEC 5530 SpinWriter 


2995.00 


2595.00 


^^^£ H ^^^^^^^^^ 


^ LRC 7000+ 


389.00 


369.00 




^^M^'^^S™"!!!^-"^ 7000+ (64 col) 


405.00 


389.00 


HPIRDS 








P^P^I^W 


W M^^ ^■■inF PRINTER CABLES: 






QPII to Expansion Interface Cable 


19.95 


19.00 




LRC to TRS-80 cable 




20.00 




LRC to APPLE cable 




20.00 


Prices subject to change 


LRC to EXIDY cable 
LRC to PET. IEEE cable 




20.00 
59.00 


without notice. 


LRC to RS232C male, cable 




65.00 




LRC to RS232C female, cable 




65.00 


Prices do not include shipping 


730 or 737 to TRS-80 cable 
779 or 753 to TRS-80 cable 




29.00 
35.00 


COD orders require 


PERIPHERIALS: 






25% cash deposit. 


Novation CAT Modem 


189.95 


179.00 




UDS 103-LP 




195.00 


•**EFFECTIVE JUNE 1st 1980*** 


RS-232-C Interface Board 


99.00 


89.00 




TRS-232 Printer Interface 




39.95 




DATA Dubber 




49.95 




16K Memory Kit, Keyboard 




99.00 




16K Memory Upgrade Kit, E.I. 




95.00 


6 South Street, 


Percom Electric Crayon, w/cable 
Busy Box, TRS-80 




279.00 
109.95 




Busy Box, APPLE 




114.95 


Milford, NH 03055 


BSR X-10, Starter Kit 
ATARI COMPUTERS: 




124.95 




ATARI 800 Computer System 


1080.00 


875.00 




ATARI 400 Computer 


630.00 


515.00 




ATARI 410 Program Recorder 


89.95 


65.00 




ATARI 810 Disk Drive 


699.95 


565.00 




ATARI 820 Printer 


599.95 


470.00 




Joystick Controllers 


19.95 


18.95 


24 


Paddle Controllers 


19.95 


18.95 




HARDSIDE in conjunction with MICROMINT has solved the 
TRS-80 i/O bottie-neck. This new expansion interface, 
designed by Steve Ciarcia. is described in detail in the June 
issue of BYTE magazine. The COMM-80 provides the most used 
features of the RS expansion interface into a single low-cost 
($180 vs. $400) unit. The COMM-80 has a full 8-bit parallel port 
compared to the RS' printer-only port. There is also a built-in 
RS-232-C interface (no extra board to purchase). A BUS 
connector Is provided for future expansion. And to really clean 
up the I/O bottle-neck, up to 16 of these units can k>e chained 
together and addressed separately. The unit connects, with the 
cable supplied, directly to the GPU/Keyboard or expansion 
interface. This is the only Interface you need to turn your TRS- 
80 Into a time-sharing terminal with provisions for a printer. 
Terminal software is included. GOMM-80 $179.95 

DEALER INQUIRIES INVITED 



TO ORDER TOLL-FREE 

1-800-258-1790 




6 South StrMt, Mllford, NH 03055 (603) 873*5144 
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I. In a recent Adventure-type game, I didn't want the user to LIST the 
program, so I found a way to disable LIST: 

POKE 16863,195 

POKE 16864.114 

POKE 16865,0 
Originally, these locations contained a Z-80 RETurn instruction; the 
POKES change them to a jump bacic to the " *• READY" prompt. 
LIST can be restored by POKE 16836.201 (the other 2 bytes don't 
matter). 

II. In a shooting gallery or air raid-type game, a string of characters 
can be made to travel across the screen in very few lines. 

Step 1) Set up string S$, 64 characters long 

Step 2) Print @ 0,S$; 

Step 3) S$=RIGHT$(S$,63)-t'LEFT$(S$,1) : GOTO Step 2 

JeffMyen 
Hllltboro, Ohio 

If you wish to lock out the keyboard, try these POKEs: 

10 POKE 16405.2 ' LOCK KEYBOARD 

20 FOR A=1 TO 5000 : NEXT 

30 POKE 16401.1 ' UNLOCK KEYBOARD 
In Level II, all keys will be deactivated by Line 10. Under Disk BASIC, 
only the [BREAK] key will still function. 

(To lock out the [BREAK] key in either language, POKE 16396.60: 
POKE16397,201.) 

If your program creates a display which you do not wish disturbed, 
POKE 16405.2 should t>e the last line of your program 

Deron Qilmore 
Carmel, CA 
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If you own a 16K TRS-80 and 
have ever NEWed a program by 
accident, or if you ever fear of 
doing so, then this is for you. If the 
program you mistakenly NEWed is 
on a cassette, and the first few 
lines are unchanged in memory, 
then simply load the cassette and 
when you see the f i rst "snowf lake" 
blink, hit the reset button and the 
program should be revived. 

This approach is much easier 
than previous methods, because 
you don't have to remember ugly 
POKE addresses or system codes. 



This method works because a 
NEW statement only resets the 
program pointers. When the 
computer receives an inputed data 
i.e., from the cassette player, it 
checks it and compares It to data 
in memory. If the data is Identical, 
it automatically sets the pointers 
to their original positions and 
won't change them unless the 
incoming data varies from 
memory. So, after the first couple 
blinks, the program Is restored. 

May you never have an unhappy 
NEW again! Erik Skyten , NH 

q Pi" f^ ■" by James Garon 

H Endless fascination for the dedicated puzzler! Each pentomino is 
I I made up of five squares, and there are twelve shapes. You can rotate 
. them, flip them over, remove pieces at will and try them elsewhere, but 
I to win you must fit them together to form a larger, 60-square shape. Top 
-| notch graphics and SOUND EFFECTS. New low price' $7 95 

m Level II. 16K «^ ^^ 

^u ^^ M^ r m 6 South Street 

tKW9onwifaivtxcnange Mmord, nh ososs 
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IBScsIiiaEfdl ¥®SJ^D(Di? 
lasncsaD S(S)mmdl 

Opera Theatre 

The finest musical program we have seen for the TRS-80. It deserves a 
quality amplifier. Amazing sound! Richard Taylor is an opera singer with a 
magnificent ear! 
Selections: 

• WILLIAM TELL OVERTURE • MUSETTA'S WALTZ 

• SEMPRE LIBERA • QUEEN OF THE NIGHT 

• LA DONNA E' MOBILE 

Challenge 

"Didn't want to stop — nearly died laughing" - Scott Adams 

Word guessing game with sound effects, one or two players. Truly 
challenging and competitive. 

Separately on cassette $9.95 (each program) 

Both programs on disk $19.95 (two programs) 
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by Douglas Carlston 



Give up your shoot^em- 
up games and move up to 
grand strategy! Fight your 
wars as a general, not a 
mere pilot! 



Galactic Empire — As commander of Galactica's Imperial 
Forces, you must conquer and hold the inhabited worlds of the 
galactic system. Deploy armies, raise taxes and conscript 
soldiers, gather intelligence, manage resources. 

Galactic Trader— You have succeeded in uniting the 
universe. Now you are an ex-soldier who must scramble for a 
living as an intergalactic tramp freighter. Outwit the locals at 
bartering, struggle with the fuel cartel, and outmaneuver the 
big trading monopolies as you seek your fortune. 

Galactic Revolution — The emperor is a bungler, and is 
becoming upopular. Your popularity is a threat, and he is 
seeking to kill you. Turnabout is fair play, so you start a 
revolution to unseat him. Will you succeed? 

Each ganle..16K Level II Cassette $14.95 
Special! — All three on Disk (32K) $39.95 



6 SouOi^reet, Box 68Mlford,NH 03055 W3-673-5144 
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AMATEUR 

ASTRONOMY 

HANDBOOK 

by George Hall 

$14.95 

Amateur Astronomy Handbook is a Level II, 16K program 
designed to help anyone from the casual observer of the glorious 
Night Skies to the more advanced amateur who needs reasonably 
accurate positional information on the Sun, Moon and Planets. 
Partial List of Features: 

* Convert Local to Sidereal time 

* Convert Right Ascension/Declination to Azimutii/Altitude or 

Heliocentric Longitude/Latitude 

* Determine Local times of Sunrise, Sunset, Moonri8e,Moonset and 

Piiases. 

* Plot position of Sun, Moon and visible planets. 

..........^....-^ TheSafh&m^ Exchange - , - , - - 




9 Games for Pre-School 
Children 

by George Blank 

Until they go to school, 
children think that learning Is 
fun, not work, is this the 
reason that they learn so 
much faster in the early 
years? And learning Is great 
play. With these games 
children tedch each other the 
alphabet, addition and sub«> 
traction, recognition of letters and words, even art as they play with pat- 
terns on the screen. The games are written for ages four to six. The author 
has a degree in education, with graduate study in child development and 
counseling, plus a wide variety of teaching experience in industry, the 
military, public and private schools, and churches, ff you have children, and 
you also have a TRS-80, then you should have Nine Games for Pre*Sctiool 
Clilidran. AH nine games and the menu are in the computer at one time, and 
the children will quickly learn to select the one they want. Level li, 16K^$9.95 




tm 



THE SOFTWARE EXCHANGE 6 South St, Milffonl, NH 030SS 
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FIX 
KEYBOARD 
BOUNCE 
FOREVER 



I hate to do this to all the people out there writing and selling 
keyboard debounce software. But that's life. Right? 

If you have debounce software, file it in the little round file on the 
floor, if you are thinking about buying debounce software, save 
your nnoney and read on. 

A long time agol had a problem with keyboard bounce, but it's 
been so long ago I almost forgot what it was like. About a year and 
a half ago when I first bought my TRS-80, I started to have 
problems with some of the keys. First it was just one key then 
another, then another, before my computer was two weeks old, 
there were half a dozen keys that would put two sometimes three 
characters on the screen with one keystroke. Enough is enough I 
thought, so I took about five minutes and fixed my keyboard. I have 
nof had another keybounce since. 

Are you ready to cure your keybounce problems forever (well at 
least for over a year), here is all you have to do. 

Run out to the garage and find that spray can of "WD-40". That's 



30^ 



right that stuff you use on rusty nuts and bolts. (Be sure it Is "WD- 
40". I have not tried any of the other products.) I know what you are 
thinking but trust me. 

Use a small hook type tool and remove the key tops by pulling 
straight up on the key. Now take the can of "WD-40" Insert the little 
red tube that comes with every can. Now spray a very small amount 
directly on the contacts of each key. Remember you don't heed 
much, about one drop per key. That's all there is to It. Your 
keybounce Is now cured. This fix has been tested on several 
TRS 80 keyboards and It has worked every time. 

f 

by Al & Gary Lowe 




^ $ GET WHAT'S COMING TO YOU $"^| 

' Prom Nepenthe PubHcrttont 1 



/WCOUSfTS RECEtWiBLE 



Adjust the ratio of customer accounts and transaction records 
to your needs, with a typical use Including 600 accounts and 
2400 records on a three drive system. 

No limit on transactions per customer per brlKng period. 

Search and display by customer name or number, with 

numbers provided by you or the computer. 

Creche information statements outside normal bitting cycle 

without disturbing cycfe. 

Optional automatic check for credit limit. 

30, eo» and 90 day aging. 

Appropriate payments to more than one transaction. 

Print mailing labels t or 3 wide. 

Standard or custom terms. 

lle<Hiifw 32K, 2 disk aytteni mriilnrittm» suppiteil on dM 

for$3t.9$. 



k 



6 SOUTH ST.» MILFORD. M.K 03G5S (603) 673-5144 
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ADVENTURES 

by Scott Adams 

Adventures on Tape: Level u, uk 

# Adventure Sampler 

Short version of Adventureland, a great way to try out adventuring 
(but you'll get addicted!) $5.95 

Adventureland 

An enchanted world with 13 lost treasures guarded by magical 
beings $14.95 

# Pirate's Cove 

Clues in blood-soaked books, a pirate and his parrot, .alligators, 
treasure ; *. . . $14.95 

# Mission Impossible 

A chance to prevent the nuclear reactor from being destroyed by a 
saboteur's time bomb $14.95 

# The Count 

Watch out! you're in Dracula's castle and you must destroy him before 
he bites you! , $14.95 

% Voodoo Castle 

Remove a curse from Count Christo $14.95 

# Strange Odyssey 

Adventure in outer space in the ruins of an ancient alien 
civilization $14.95 

Mysterv Fun House 

It will tate all your ingenuity just to get past the ticket counter, and 
that's only the beginning! $14.95 

# Pyramid of Doom 

In the shifting sands of the Sahara lies an ancient Pyramid, filled with 
Egyptian treaasures $14.95 

'^ ^ OhostTown 

Steal the treasures from their ghostly guardians before nightfall 
$14.95 

Adventures on Disk^ in Sets: 

SSet 1: Mission Impossible, Pirate's Cove, Adventureland $39.95 
Set 2: Voodoo Castle, The Count, Strange Odyssey $39.95 

(programs are in Machine Language) 

The Sath/^re Exchange 

6SouthStreet,Box68,Milfo!d,NH03055 603-673-5144 
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Floppy Disk \>j;^^tSV 
Diagnostic vA^t 

by Dave Stambaugh ^XN^ 

• 35 or 40 track in same program 

• Tests controller functions and status bits 

• Tests drive speed and aifows adjustment 

• Tests switciies and mechanical 
components 

• Verifies data transfer 

• Tests drive seeic function 

• Sector and byte write and read tests 
using ail possible patterns 

#16 to 48K, 1 to 4 disk drives 

• Tests cross cylinder interference 

• Tests drive-to-drive compatibility 

The best and most complete diagnostic you can buy 
to verify disk drive reliability and find problems. 
Displays 19 error messages and cross references 
them to 14 possible causes. Continuous test option 
for exhaustive testing keeps statistical record of all 
errors found. 

Suppiied on diskette with manuai for oniy 
$24.95. 



TheSaHwan Exchange 

6ScxJthStmet,Box68Milfotd,NH03055 603-673-5144 
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fOhcss Lmiers! 




SARGON 



This is the on« that started the revolution in computer chess. Six 

levels of play from beginning through advanced amateur. Ready 

whenever you are. Tape $19.85. 



SARGON II 



The best has gotten betted Sargon. the program that came in first in 

the Creative Computing Microcomputer Chess Tournament has 

become Sargon II. A greatly improved game, faster response time, 

new level for beginners, easier to pre-set board, hint mode— what 

does the computer suggest. Sargon II is the program that took on 

the maxi-computers in the West Coast tournament, and finished in 

the money! More thinking power than vou ever expected. 

Tape U9.M on disk mM 



Both in stock for immediate deiiveryt 



6SaMhStreet,Box68,imotd,NH(B0SS 603'673-Sm 
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Unlock the^hidden 
power of your 

computer! 

PROGRAM FAST & EASY! 

Use ROM routines in your 
BASIC and Assembly 
Language programs! 

All you need to know is in... 




THROUGH THC 




REFERENCE GUIDE 

TO LEVEL II BASIC 

$19.95 piutti. 



SUPERMAP 



from Fullir SoftWiri prtvtously sold at S18 95 



TRS-80 Disassembled Handbook 

by Rebirt Richardson previously soio at sto oo 



Hex Mem 



monitor wrlttm In BASIC by Mm Pkllllp 



Z-80 Disassembler by 



Georoi Blinic 



Qescription of the contents of the Level II BASIC ROM by memory location, 

by function, and in lesson format Includes several BASIC and 

Assembly Language programs in listing format to examine and use 

ROM routines 

TheSathnate Exchange 

6 i(xith^nKH, Box 68, MHiaxiM / 0«»5 H)i-b7i-'im 




SUPER SIMPLE SOUND 
INTERFACE FOR TRS-80* 



by Edward Ting 



You've had your TRS-80 for 
some time now, and you're 
beginning to build up a decent 
software collection. You've heard 
about one of the new programs 
which feature sound to add lively 
effects to your game. But you're 
told a small amplifier is needed 
and you don't have one. You look 
In the Radio Shack catalog and — 
HORRORS! Their pocket amplifier 
will cost you $10.95, more than 
most people would pay for such a 
device. So the amplifier idea is 
rejected, and most people never 
get to hear those wonderful 
sounds that come in so many of 
today's programs. 

But now, a solution to this 
dilemma is solved as you can 
easily build your own. A very 
simple electronic circuit can be 
put together for an absolute 
maximum of about $5. Most of us 
can build the amp for under half 
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that, and electronic hobbyists of 
all types will be able to build it for 
nothing. 

The circuit is of very basic 
design and contains only three 
electronic components plus a 
speaker and switch. A small 
speaker, ripped-off from a 
portable radio, will do nicely. The 
other parts are as follows: 

1. A general purpose PNP type 
transistor. Almost any PNP will do. 
If you have to run to the Shack, get 
Cat. No. 276-2004. 

2. A general purpose NPN type 
transistor. This is the very popular 
2N-2222 which often goes 20 for 
$1.00. Again, if you're starting 
from scratch, Cat. No. 276-2009 
from Radio Shack will do superbly. 

3. A resistor, which can range 
from 2.7K to about 5.6K. 




The circuit is 
to the left. 



SPEAKER 



Construction 

If you know how, go ahead and 
build the circuit. If not, here^s how. 
You do not need perforated board 



as it would be a waste. Take a small 
square of cardboard from a cereal 
box, tissue box. etc. Punch holes 
in the configuration shown: 



EMITTER OF PHP 
BASE OF PHP 
COLLECTOR OF PNI 




CARDBOARD 



EMfTTER OF HPH 
COLLECTOR OF Nl 



TWO WIRES OF RESISTOR 



BASE ON HPH 



The package of the transistor 
should tell you which lead is 
which. Push In the parts where 
shown, bending wires as 
necessary. Solder the collector of 
the PNP to the closer lead of the 
resistor. Solder the other wire of 
the resistor to the base of the NPN. 
Solder a length of wire to each 
terminal of the speaker. The other 
end of one of the wires goes to the 
collector of the NPN. The 
remaining speaker wire goes to 
the emitter of the PNP. 

Solder a "C" or a "D" cell Into 
the circuit. You can use a battery 
holder if you wish. Solder a length 
of wire from the + end of the 
battery and the emitter of the PNP. 
Solder another length of wire from 
the - end of the battery and the 
emitter of the NPN, but break the 



connection and put in a small 
switch. 

Next, solder two long lengths of 
wire, one to the base of the PNP 
and the other to the emitter of the 
PNP. Mark the second wire with 
some tape so you'll be able to 
recognize it later. Solder two small 
alligator clips to the free ends of 
the wires just connected into the 
circuit. The amplifier is now 
complete. You might want to put it 
In a small enclosure, but you don't 
have to go out and get an 
expensive, feature-loaded 
cabinet. Something as simple as 
an empty cardboard tissue box cut 
in half will suffice. Remember, the 
amplifier could care less whether 
the enclosure has metal screws or 
Captain Crunch on the cover. 
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Testing 

CLOAD your sound program. 
When the computer is READY, 
take the large grey plug that 
connects to the AUX. jack of your 



recorder. CHp the wire (the one 
you marked with tape) to the TIP 
terminal of the plug. Clip the 
remaining lead to the other 
terminal.. 



X. 



CLIP OTHER 
LEAD HERE 



CLIP MARKED. 
WIRE HERE 



Flip the switch on and listen in on the fun! 




^1 Vify) not iSure uohat fo jcdc __ 
-torrn^ comixtkr, so r broughf 'alon^ 
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byte off aH you can chew! 

SSEMBL^ 
LANGUAGE 
PROGRAMMIN 
AIDS 

Z-80and 8080 Assembly 
Language Programming 

by Kathe Spraeklofi 

Finally! A good tutorial book on assembly language programming 
by a master of the art! Kathe Spracklen, co-author of Sargon, tells you 
how with simple straightforward instruction. $7.95^ $i shipping 

Microsoft 
Editor/Assembler Pius 

Plus what? Well, you get the features of the T-Bug and the original 
editor/assembler plus macros and conditional assembly, plus extra 
commands like substitute, move, copy, and extend, plus Z-Bug, a 
powerful debugging monitor with 8 level breakpoint capability. A 
bargain at $29.95 

Super Simon 

By George Blank 

Complete Z-80 Disassembler with ability to generate symbol tables, 
dump in Hex, ASCII, or even decimal with poke addresses. Writes 
machine language tapes. Written in BASIC so it loads easy and is easy 
to modify. $9.95 

mSMSM 6SouthSti^^.Box68.Milfoid.NH03(m 603-673-5144 
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MICRO 
MILLIONAIRE 

by George Blank 



If yotMivill look through the 
various microcomputer mag- 
azines and computer stores, you 
will find more than TOO different 
software companies represented. 
Some of these "companies" are 
really nothing more than the part- 
time effort of a single programmer. 
Such small efforts can survive on 
the strengths of one or two pro- 
grams and a few dollars for adver- 
tising. 

Yet, while it takes little to survive 
as a software publisher, it takes a 
great deal to flourish. The market 
for good programs is very 
competitive. Best selling authors" 
look for the firms that advertise 
their programs well, treat them 
fairly, and pay good royalties. 
Computer stores are starting to 
demand exceptional packaging. 
Software piracy cuts into sales and 
expensive countermeasures, in- 
cluding good documentation, are 
required. You always risk a better 
product coming out at a lower 
price. Production problems can 
lead to slow delivery, lost sales, 
and turned-off customers. Ad- 
vertising is expensive; TSE cur- 
rently spends $20,000 a month on 
advertising for our products. 

Can you make it as a software 
publisher? This simulation is 
based on the experience of The 
Software Exchange. The factors 
are realistically balanced, though 
for the sake of simplification, the 
factors have been reduced. For 
example, in most cases you can 
look to more sales from a given 
amount of advertising than this 
program will allow, but I have 
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omitted some other selling costs 
such as the preparation of the ads 
and salesmen's salaries to 
compensate. In addition, all sales 
are considered retail, when most 
companies offer significant dis- 
counts to dealers and distributors. 

You start the game with a 
random amount of money to begin 
your company. From this amount 
is immediately deducted the cost 
of a small computer. Then you 
move Into the monthly cycle of the 
game. 

At another point later on in each 
turn, you will be given an oppor- 
tunity to debug any of your pro- 
grams, so if you want to wait and 
hire a programmer to do it on the 
next turn, you can do so. However, 
if you choose this route, do not 
order any tapes or disks until the 
debugging, or you will have to 
salvage them. 

The next phase of the program is 
the inventory routine. The screen 
will display for each program the 
current monthly sales and the 
number of cassettes or diskettes 
and manuals in stock. If the 
number is negative, you are 
backordered and must order 
enough to satisfy your backorders 
before continuing. When you 
order, quantity discounts are cal- 
culated automatically. You must 
verify any order before it is posted, 
so you may get several quotes for 
different quantities before ac- 
cepting one of them. If you wish to 
conserve cash, it is not necessary 
to order a product until It has been 
advertised for one month. Aft^r 
that, sales are affected by whether 



or not the item Is in stock, though 
some sales will continue. 

The next step is an outlook 
forecast from the sales manager, 
who will interpret sales and report 
your returns. If returns exceed 3% 
on any program, which is normal 
for minor tape loading problems, 
etc., you will be given the 
opportunity of debugging the 
program further, simply replacing 
the tapes, or cancelling the 
product and refunding the 
customer's money. 

If you are spending money you 
don't have, you must "pay the 
piper" at this time. If you are small, 
you must borrow from a loan 
shark. Once you get big, the bank 
is willing to offer credit. The loan 
shark charges 25% a month, the 
bank a mere 2% a month. 

This report will also describe 
any significant competitive pro- 
ducts introduced by other pub- 
lishers. In some cases, they will 
drastically affect your sales, in 
much the same way that Scripsit 
clobbered Electric Pencil. In other 
cases, the effect will be minor. 

You will now have an 
opportunity to eliminate items 
from your line, change prices, and 
debug current programs as you 
desire. 

Each turn begins with an 
opportunity to determine your 
working hours. Up to 20 hours a 
week can be thought of as a part- 
time job while you are earning 
your living elsewhere. Over that 
amount of time, you are charged 
$5 an hour toward your living 
expenses. 

After determining your own 
time, you are given the oppor- 
tunity to hire employees and 
install a WATS line. You need 
skilled technical employees to 
analyze and debug programs and 
answer technical questions. 



Unskilled employees can take 
orders and fulfill them. You pay 
more for the skilled employees. It 
is not a good Idea to hire people 
before you have work for them to 
do. Unfortunately, not having 
enough people means cancelled 
orders, lost sales, and no time to 
fix problems in programs. Addi- 
tional WATS lines increase sales, 
but on a percentage basis, so you 
need a good strong base to justify 
the cost of a WATS line. 

The next phase of the game is 
the program submission phase. 
You must decide how much time 
you will spend screening each 
program submitted. The more 
time you spend, the more accurate 
your report on the program will be. 
You have a chance to reject each 
program immediately or evaluate 
it further. Subsequent evaluation 
is similar to screening, except that 
you are also given an approximate 
market value for each product. At 
this time you must decide whether 
or not to publish the program, and 
if so, at what price. 

If you decide to publish a pro- 
gram, you are given the option of 
debugging it. You must have at 
least 2 hours of programmer time 
available to even start debugging, 
and it usually takes at leasts hours 
just to determine that a good 
program has no bugs. Correcting 
bugs can take a lot longer. In the 
debugging routine, a miniature 
computer is displayed on your 
screen, running a test program. 
The test program alternates 
between displaying OK and — -.- 
(Morse code for OK). If there is a 
bug in your program, it will show 
up as an asterisk, with a Y 
appearing to the left of the small 
computer to indicate that a known 
bug exists. If you are lucky, a little 
bug will appear on the screen and 
dance^round long enough for you 
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to dctuaHy 'ZAP or correct the 
bug. The process is very much like 
the real effort. You have to use the 
program long enough to find the 
bugs, hunt down each bug, then 
test to make sure you have gotten 
them all. You can leave the debug- 
ging routine at any time by pres- 
sing the up arrow, if you are con- 
fident that there are no further 
bugs, or if you want to examine 
another progranri. 

The next phase Is placing your 
advertising. If you have a large 
mailing list of customers, you may 
print and mail out a catalog, the 
most effective form of advertising. 
Otherwise, you must advertise in 
the magazines. The personality of 
the magazines reflects our 
experience with them at The 
Software Exchange. There is a 
random factor involved that gives 
each magazine a slightly different 
personality each time you play, 
but In general you will find that: 

Byte has sophisticated readers 
with high Incomes and Is a good 
place to advertise expensive, 
quality products. 

Creative has a lot of readers 
interested in applications and is a 
good place to advertise medium 
price, quality products. 

The S-8ighty is a free magazine, 
and appeals to bargain hunters. 
Low-price packages sell well. Ad- 
vertising rates are low, so you get a 
lot for your money. 

Kilobaud has unsophisticated 
readers and offers credit to adver- 
tisers like Data Sync and Word 
Power Systems, making it the best 
place in the industry to offer 
worthless products. 

Your mailing Jist grows each 
time you advertise in Creative or 
Byte, so you will benefit by 
building up your list for cata- 
logues. There is a point of dimin- 
ishing returns beyond which more 
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advertising for a product does not 
bring in as many sales, so you 
should experiment with your ad- 
vertising mix. it might be helpful 
for you to know that in the real 
world, a page of advertising runs 
from $450 in the S-8ighty to over 
$2000 in Byte: 

After your advertising is placed, 
you get your sales report for the 
month, by product. Remember 
that it takes a couple of months 
from the time you place (and pay 
for) an ad to the time when sales 
come in. Sharp players will note 
the relationship of sales to adver- 
tisements in different magazines. 
Other factors that affect sales are 
the quality and price of the 
program, competitive products, 
bugs in the program and your 
overall quality reputation (based 
on the total number of bugs in all 
your programs), the time of year 
(sales are best In January and 
February, worst In July and 
August), and random factors. 

The final phase in each month is 
your income statement and 
balance sheet. This tells you 
where your money went and how 
much you have. 

Once a year, in January, your 
taxes are calculated. If you cannot 
pay your taxes, you go bankrupt 
and lose. If you are worth one mil- 
lion dollars after taxes, you win, 
and get to retire. 

If you go bankrupt too often, or If 
you don't have the money or the 
time it takes to be established in 
the software industry, then my 
recommendation is that you 
consider letting someone else 
publish your software. Different 
products do better with different 
publishers, but my experience is 
telling me again and again that you 
do best with either Ramworks or 
Personal Software for TRS-80 
products. 



10 REM * HKSO MILLIOMillRE COPVRIGHT (C) 1988 GEORGE BLflNK * 

20 RftW>OM:CLEfiR750:DEFSTRft,G:[)EFDH.C:DIM ft(25):DIM S<24,];);DIM P 

(26, 17) : HV=1980 : J8=20+RND(20) . Ji=5+RND<20) : J2=25+RND<10) : J3=8+RN 

D<10) ; J4=(18+RM)(25) )/i00 : J5=RND(25>/i00 : J6=RW)(25)/100 : J7=Rha>(2 

5)/'i00 

30 11=1 : G=STRING$<50, 148) : Gl="$«, IH> #«#.##": Q2="«###. #• HOJS" : 

G];=CHR*(149)+" "+Cl«*<l?0):G4=STRING*(10,i88):(S=" "+C«* 

<168)+CHR$(l?5)+CHRt<l?3)+" ":G6=" OK ":GI1="JIWEBm 

RflPRHflVJWiJULfllKSEPOCTWJVDEC" 

48 aS:PRM"mCRO HlLLIONfiIRE":PRINT 

50 INPUT"I*«T IS TJ£ Nffl€ OF VOUR SOFJHflRE HOUSE"; N$ 

en C=(RND(10)+5)*i808: PRINT" YOU l*IVE RAISED $"iCi" TO GO INTO BU 

sircss" 

70 PRINT" VOU HRVE JUST PURCHFISED ft COMPUTER SVSTEM FOR $2888" CT 

=C : C=C-2880 . CE=2888 : CC=2888 

88 PRINT"YOU HflVE *"iCi" LEFT. ":PRINT 

98 G0SUB128:G0T0148 

188 F0RZ2=1T0158: NEXT: RETURN 

118 flB=HID»<G«, <M-l)*3+i,2)+STR$<MV):PRINTflB:RETURN 

128 PR1NT"«PRESS ENTER»"i 

138 flft=INKEV$: IFflft=""THEN138EI.SEPRlNTflft;RETURN 

148 Q0SUB348: ' SCHEDULE ft HIRING 

158 G0SUB478: ' SUBMISSIONS 

168 G0SUB968: ' INVENTORY 

178 KISUB1628; ' OUTLOOK 

188 GOSUBllSO: ' ffiiVERTISING 

198 G0SUB1318: ' SflLES REPORT 

210 IF M=lftNOMY>1980THENGOSUB250: ' TAXES 

220 G0SUB758: ' FINANCIAL REPORT 

230 M=M+1 : IFH>12THEM1=1 . MV=MY+1 

240 KIT0148: ' LOOP E«CK FOR NEXT YEAR 
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258 CLS:PR1HT" ",■- TAX TIME -* 

266 PRINT-VOUR FflWRITE UNCLE REQUESTS THE PLEASURE GF VQUR HOIE 

VTOFRVVPRIMT-IDLEBURERUCRATS. HRRRSS BUSINESSHEN. AND MR(£ H 

flR.":PRIMT 

278 PRlNT"TflX DUE: 'i :CZ=(GE-CW)*C+CT-CT:CT=C2:CC=ayi8:CZ=CZ/2 

:IFCZ<8THEMCZ=8 

288 PRlHTUSlHGGiiCZ 1FGDCZTHEHCOC2 

298 PRINT'LESS IMVESTHENT TBX CREDIT: *;USINQG1*CC 

388 PRIMT'NET TflX*TflB(32)U5INQ61iC2-€C:OC-C2+CC 

318 IF<C+CV/3)<8THEirRINT''UH - OH! VOU JUST HENT BflNKRUPTiVEND 

328 IFC>ie8ee88THENPRIHT"C0NGRfmJLflTI0NS! VOU ARE A HILLIONAIRE* 

:PRINT''HHV DON'T VOU SELL THE BUSINESS. BUV A VACKT> AND RETIRE! 

•:END 

338 G0SUBi28:CC«8:RETURN 

348 CLS:PRIKTN». ■- HORK SCHEDULE - *i :GQSUB118:PRIIfT 
3S8 H^rlFPOANDEaTHENINPUT-HOH HANV HOURS HILL VOU HORK PER H 
EEK";H:IFH>€8THENH^ 
368 CD«8: IFH>28THENCI>«(H^28>*25:&C-CD 

378 PRINT -PRIHT'SKILL LEVEL PRESBJT STAFF HOURLV C 

OST" 

388 PRIHT"ORDER FULFILLMENT "iE TflB(44)»» 5.88" 
398 PRINT'TECHNICflL STAFF 'if TAB(44)"* 9.88":PR1HT"M1DE AREA 
TELEPHONE SERVICE (NATS) »18e8 PER MONTH PER LINE" 
488 E1»8:INPUT''H0HMANV ORDER TAKERS DO VOU WISH TO HIR£"iEi:Pi« 
e:lNPUT"HOH HANV PROGRAMMERS"iPi:Hl=8:INPUT«H0H MAMV HATS LINES 
MOULD VOU LIKE TO ADD"iHl:H4mil 
418 HA=E*2+P*2:IFHAW3THENHA=Hi^ 

428 H4t*2:PRIHT"V0U HILL SPEND "; H+HAi' HOURS ON ADMINISTRATION 
AND "jEl*i+Pl*3:PRINT"H0URS INVERVIEHING THIS MONTR 'i :H=H-(Ei* 
1+P1*3+HA):IFH<1THENB=1 
438 PRINT*VOU HAVE"! Hi "HOURS LEFT. " 

448 E'£-t£i:H=4W>l*a*P*158:CP=E*168*34Pl*75»7+P*168*7:P=f4Pl 
458 C3:€l*ie88+Pi*3888:IFC3>8THEW>RINT«V0U HAVE ORDERED «*iC3i" 
HORTH OF leUIPMENT FOR NEH STAFF" :CE=tt+C3:CC=C<C3 
468 PRINT:Q0SUBi28:RETURN 

478 CLS:PR1HTM$, "- SUBMISSIONS - "i :G0SUBli8:PRINT 

488 S=RND<3) :FORX=1TOS:S<X,8)=RND(188) :S(X, l>=RND<18)+RND<i8)+RN 
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D(i8) : IFRND<7)=iTHEN5(X, i)=S<X, l)*2+RND(i) 
490NEXTX 

568 V=3e:lNPUT"H0M MflNV MINUTES HILL VOU SCREEN EflCH PROGRftM (5- 
38) "i V : IFV<5TI€NRETURNELSEH=H-S*Y/68 : IFV>28THENV=38 
510 PR1NT§64, "PROGRflM INITIAL RATING"; CHi»(3i):PRINnffi<8 

)eTAB<i8)2eTAB(28)4eTAB(38)60TflB<48>80TAB<58)188 
528 Z=58-Y:XX=0:fORX=iTOS 

538 SS=S(X, 8)+RND<2)-RND(2> : IFSS<iTI£NSS=iELSElFSS>188THENSS=ie0 
548 S(X, 3)=SS : SS=SS/2 :PRINT8i92, XTflB(8)LEFT$<G. SS)i CHR*(3i) 
558 PRINT:PRINT"DO VOU HISH TO EVALUATE THIS PROGRAM FURTHER (V/ 
N)"; :G0SUBi38: IFflfl="N"THENS<X, 8>=8ELSEXX=i 
568 NEXT: IFXK=8THENRETURN 

578 V=i2e:INPUT"H0H MANV MINUTES HILL VOU EVALUATE EACH PROGRAM 
<8-128) "i V : IFV<8R0V>i28THEN5?8ELSEZ=^-Y/3 
588 PRINT§78, "FINAL IWTING "i 

598 FORX=iTOS: IFS<}Ce)=80RHaTHEN748 

668 SS=S(X, e)+RMXZ)-RND(Z> : IFSS<iTHENSS=lELSEIFSS>i08THENSS=i88 
618 H=H-V/6e : IFStX, 8K68ANOSS>8eTHENSS=SS-RND(20) 
628 1FS(X,0K68THENS<X,1)=1 
638 SL=S(X,l):IFSL>5THENSL=SL+RND(SL/2>-RND(SL/2) 
646 S<X, 3)=SL : PRINT§i92, XTAB<8)LEFT$(6, SS)i CHRf (31) 
658 PRlNnAB<12> "ESTIMATED RETAIL VfiLUE *";SL 
666 PRIHT'DO VOU HANT TO PUBLISH THIS PROGRAM <V/N)"i :Q0SUB136:I 
FAft="N"THENS<X, 8)=8:G0T074e 

678 2=8: IFN<25THEN698ELSEFORV=1T025; AV=A(V) : IFLEN<AV)>i8THENRV=L 
EFT$<AVae) 

688 PRIMTViAV, :NEXT:IlffUT"HHICH CURRENT PROGRAM DO VOU WISH TO R 
EPLACE (OR 6>"iZ:IF2=0THEN748 
696 IF2=eTHEN2=M+l:N=N+l 

788 INPUT'HHAT HILL VOU CALL THIS PROGRAM"; A<Z):INPUT"HHAT PRICE 
HILL VOU CHfiRGE"iP(2,4):INPUT"H0H MANV PAGES OF DOCUMENTATION"; 
P(Z,6) :H=H-P(2, 6)/2:P<2> 14)=e: IFRND<2>=1THEHP(Z, 14)=RHD<7) 
718 IFLEN<A<X)»i4THEMA(X)=LEFT*<A<X), 14) 
728 PRINT"DO VOU HISH TO DEBUG ?"; :G0SUB138:IF AA="V"Q0SUB85e 
736 P<2, 6)=i88:P<L 1)=8:P<Z, 2)=S<X. 8) :P(Z, 3)=S<X, 1) :P<2, 5)=8:P<2 
, 7)=e :P<L 8)=e: P<2, 9)=6 : P(2, 18)=8 : P(L ll)=e : P(2, 12)=S(X, 2) : P<L 1 
3)=S<X,3):P(Z,i5)=8 
748 NEXTX: RETURN 
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758 CLS:PRIKTH*, •- HONTHLV STftTEHEMT -': :G0SUBli8:Q0SUBi27e 

766 PRimfDRflUNUSINGGL CD. -.PRINT- SfLESMfilNQGl; CS 

77ePRIHrpfiVR0LL",USIMGeiiCP, :PRM" SRLVflGE'.USIHQGlia 

788 PRINT"STOCK",USINGGi;CI:PRINT"M>VERTISING",USlM(MiCfl 

796 PRINT"POSTflGE", USINGOi; CH:PRINT"EQUIP«EMT", USINGGi; C3:PRINT" 

RENT/UTIL", USINGGI; CR:PRINT"ROVflLTIES». USINGGi; CV 

888 PRINT" ","- BflLflNCE SHEET -":PRINT"fBSETS".,"LIflBiLIITES" 

818 CN=a<+CE/186:IFCN>CE*.9THENCN=CE*.9:l«H * DEPRECIflTIOH * 

828 PRINT»Cf6H", USINGGi; C, : PRINT" EQUITVS USINGGL C+CV+CE-CN 

838 PRINT" INVENTORV", USINGGi; CV:PRINT"EQUIPHENT "USINGGi; CE: 

PRINT" LESS DEPREC -"; USINGGI; CN: PRINT" EQUIPMENT", USINGGi; CE-CN 

, :PRINT" "; :G0SUBi28 

848 RETU»4 

K6 PRINTi5i2,Ct«fGi>;"DEHJG6IN6","TIME flVflILflBLE:":I^INTfl(2); 

868 PRINT8912, "PRESS "■ WEH FINISHED DEBUGGING" :(3>=LEFT$(G6, 8) :Z 

D=9 

878 PRINT8688, CHR$<i56); LEFTKG, 8); CHR$<i?2) : PRINTTflB(24)G3 : PRIN 

TTflB<24)CHR$<i4i>; LEFT$<Q, 8); CHR$<142) -.PRINT'KNOHN FLFMS"; TFI8<24 

)G4; Tfle<47) "BUGS aiHINfiTED"; : P0KEi6i28, 48 : P0KEi6878, 78 

%8 RINTeiS^,USIt«»i2;H; :PRINT@6^>(a); 

898 IF P(2,14)<iTHEN93eELSEZX=RND<i2-P<:Z,14)):IFZ50iTHEN938ELSE2 

X=RND<3> ; IFZX=iTHEN988ELSE928 

%8 PRINT@6^, G5; : G0SJBi88 : PRINTe666, G5; : WSimm : PRINT8667, G5; : 

«)SU8188 : PRINT#666> G5; : GOSUBIW : PRINT8667. (S; : G0SUBi88:PRINTe«68 

,G5; :G0SUBie8:PRINT8667,65; :G(3SUBi88:PRINT8666," Z ft P "; :P0KE16 

128,PEEK(16128)+i:G0SUBie8:60SUBiee 

918 P0KEi6878, 78:P<L i4)=P(Z, i4>-i:(a)TMS8 

928 P0KEi6878,89.H=H-l/5:GD=RIGHTf<G0.7)+"*":G0SUBi86:2D=ZIHl:IF 

2D>15TJCNZD=i . £OT0«8ELSE®8 

938 H=H-l/^:(a)=RIfflTI(GD, 7)+HID*(G6, 2D, 1) :G0aJB188:ZD=2D+l: IF2D> 

i5TJ©GD=i 

948 IFH<iTHENRETlW< 

958 IFIfrB(EV$="""T}€Wi!ETl«r€LSE^ 

966 CI=8:CLS:PRINTN$,"- INVENTGRV -"; ;(MSt«il8 

978 IFN<iTl€Nli48 

9® PRINT@i28, "PROSWI m mi) DOCUMENTflTKWCW mib l€Tfll 

L »et S«.ES" 

9M FCRX=1T(»I 

1888 IFP(X,6)=6TF£(«><X,7>=0 
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1818 PRINTK56* CHR*<21) ; fl(X)TflB<15>P<X, l)TflB(25>P<X, 6>i "PflGES"Tfl 

B(25)P<X, 7)TflB(45)"$"i P(X, 4)TftB(55>P(X,5) 

1828 PRIHTM48,CHR*Gi)i "CURRENT PURCHflSES "iUSIWi61iCl:PRlMT"<T 

VPE: C -CONTINUE D-OOCUHENTftTION H=OISK OR TfiPE MEDIfl>" 

1838 Q0SUB138: IFflfl="C"THEN1118ELSEIFflfi="D-THEN1848ELSEIFflfl="M"TH 

EN188eELSE1838 

1848 iri>UT"HOH MfiHY COPIES OF THE MflNUflL"iD.Dl=D«f<K,6):DC=01*. 8 

5: lFDl>1888THENDC=Di*. 83: IFDi>5e8eTHENDC=Di*. 815 

1858 IFP<X,4»28THENDC=0C*2 

1868 IFP(X,4)>58THENDC=DC+D 

1878 PRINTD;" COPIES HILL COST $M>C:PRINT"IS THIS OK <V/N)"i :G0 

SUB138: IFflfl="V"THENCI=CI+DC:P<X, 7)=P<X, 7)+l>:D=8.0C=e.Dl=8:Q0T0ie 

88ELSED»e : DC=8 : Dl:^ : G0T01828 

1886 INPUT'HOH HflNV CftSSETTES OR DISK^TES";D:DC=58.IFD>33THEM)C 

=0*1. 5:IFD>188TNENDC=D*1. IFD>258THENDC=t)*. 7: IFD>1888THENDC=DC*. 5 

1898 IFP(X,4)>25THEHW>BC*3 

1188 PRIMTDi "WJPLICflTlON HILL COST «% DC. PRINT* IS THIS OK (V/N)* 

i :Q0SUBi38:IFf«="V"THENCI=CI+0C:P(X,l)=P(X,l>+D:D=e:DC=e:Q0T0181 

KLSQ>=8:DC;«:GDTQi628 

1118 IP<}C 1><8THENPRINT*V0U HUST PURCHASE MEDIR" :Q0T01888 

1128 IFP<X,7)<8TI€NPRINT"V0U MUST PURCHASE DOCUHENTflTION":Q0TOie 
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1138 NEXT 

1148 C=C-CI:RETURN 

1158 Ul=8:Cl=8:Cfi=8:CLS.PRINTI»,"- flDVERTISINB -*; :Q0SUB118 

1168 IFNaTHEH1268ELSEflN=STR*<NV) :Mi=«*3+l : IF«>18THENH1=(H-11)*3 

♦1:»*=STR$<HV*1) 

1165 eOSUB 1968 

U76flHII&>(GH>HL3>«fM:PRIKrtl28.'Pfi0fii»t ON HRNO UST 

warn -Sfusr- icnrit" 

list F(Kit>iT(ll 

1196 Plt»me56» QKHnh R(X>TflB(15>P<X> 1)T»<25) *«"> P(X, 4)T(tt<46 

>P(X»5>TflB(St>P(X.15> 

1286 Cl<f <X» 8>4PCX> 9>4P(X> 16>4P<X, 11) :PRIIfT644& GHR»<^>i "CURREN 

T AD^ffiRTISINI *iUSINQBt^Cft»Cl:PRIKr''<TVPE 6-WTE C-CRERTM 

8-61GHIV K-KILQBCW N -NEXT>'' 
1216 PRUflUSINGGlj P(X. 8>. P(X, 9>< P(X. 16). PCX* H) 
1226 60Stm36:IF«^'ifTME)efN»«^:6efrQi258ELSEIFM^"B*1teHI»*6 
m*:E»8:6(mtt238ELSEIFi»s»C'TNBffif^*CREATlVE C@NnfriM6":Dn:9:G0T 
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01238eLSEIFfifi="8-THENflH="THE S-SIGHTV" :D=18;QOT<^20ELSElFflft="K" 

THENflH="KILOBflUD HICROCOHPUTING" :D=11:60T01238ELSE1228 

1236 PRINT-HOH HUDI DO VOU MISH TO SPEND H>VQ%TISING THE nWGRfU 

":PRlKTfi<X)i" IN THE ";flN;" "iflHi" $"i;lNPUTi:4 

1246 PRINT :PRIHT"$"iDli "IN "iflMi". IS THIS CORRECT <V/N)?"i :GOSU 

6136 : IFFIfi="V"THENP<X, D)=Di: Q0T0119eELSEDi=8 : G0T0i266 

1256 U=U+P<X, 8)/3+P(X, 9)/3 : NEXT : U=FIX<U) 

1266 C=C-Cfl: RETURN 

1278 CR=<E+P)*326+18e6*H+156:C=C-<CP+CR):REH * SEE 478 FOR 0* » 

1286 PP=e:GV=e: IFN>eTHENFOIW=lTON:CV=GV+P<X, 1)*P(X, 4)/6:PP=PP+P< 

X,5):NEXT 

1298 CV=CS/5:C»=PP/2+TR 

1388 RETURN 

1318 CLS:PRINTN$, "- SfltfS REPORT -"i G0SUB116 

1328 CS=e:lFNaTHENPRlNT"NO SflLB THIS H0NTH*.QOTO1596 

13» PS=8:Fl=8:F2=6:F3=e:F4=6:F5=8:F0K«=lTON:Fl=Fl+P<X, 8) F2=F2* 

P<X, 9) :B=f 3+P<X, 16) :F4=F4+P(X> 11) :F5=F5H><X, 14):NEXT.F8=F1+F24F 

3+F4 

1348 REH * TOTAL BUGS ♦ 

1358 IFF5>iTHEHF5=RM)(F5) 

1368 REH * TOTAL ADVERTISING * 

1378 F6=INT(F8/1888) : 1FF8>1THENF6=RHD(F8) 

1^6 REN * HfiXIMJH POSIBLE SUES * 

1396 F6=l: lFFl>28ee6THENF6=2e866/Fl 

i486 F7=l: IFF2>188e8tHENF7=ie88e/f 2 

1416 F8=l:IFF3>58e8THENF8=588e/T3 

1428 F9=l : IFF4>15e86THENF9=15888/F3 

14:a (iOSUB1618:FQK<=lT(W 

1446 P<X, 8)=P(X, 8)-RND(5) : IFF5>1THENP<X, 8)=P(X, e)-IM>(F5) 

1458 IFFe>lTHENP(X, 6)=P(X, 6)+RW)(F8) 

1468 PT=(P<X, 6)+P<X, 6))/iee*P(X, 2)/18e*P<X, 3)/P(X, 4)*«P<X, 8)*F6 

*1. 3)+(P(X, 9)*R*i. 5)+<P<X, 18)*F8*2)+(P(& 11)*F9«. 7))+P(X, 5)/(3+ 

RWXie) ) : PT=PT*(98+RND(28) )/188 

1478 IF(P(X, 4)>J6)flND<P(X; 6)>i2)THENPT=PT+P<X, 8)*J4 

1488 IFP(X, 4)<J2fiNDP(Xi 4)>J1THEWT=PT+P<X. 9)*J5 

1498 IFP<X, 4)<J3THENPT=PT+P<X, ie)*J6 

1588 IFP(X, 4)<50RP(X, 14)>4THB«*T=PT+P(X, 18)*J7 

1518 IFH>8T«NPT=PT+H*<5+RND(i8) )*PTAe8 
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1528 IFPT>P<X,l>THEMPT=PT+P(X,l)/2 

1538 IFH=?0RI1»8THENPT=P7*. 9 

1548 IFH=10RH=2THENPT=PT*1. 1 

1545 PT=PT+Ul*<5+ra«)(?)) :P(X, i7>=P<>0 17>+FIX(Ui*<2-Hai><6)>/1»(X, 4 

»:REH* CflTflLOG SflLES * 

1558 PT=PT/P<X> 4) :PT=FIX<PT) : IFH>21flNDP(X, 5»22THEIt«=«HD<»-28> : 

PT=PT+HR:H=H-HR/2 

1568 P<X, 5)=P<X, 16) :P<X, 16>=P<X, 17) :P<X, 17)»PT :P<X. 15)=f <X, 15)+P 

(X, 5) :CS=CS+P(Xi 5)«P<X, 4) :P(X, 1>«P<X. 1)-P<X,5> :PS=PS*P<X,5) :P(X, 

7>=P<X, 7)-P<X, 5) :PRIHTfl<X). '*'i P(X, 4), P<X, 5), USINGGl; P<X,4)*P<X, 

5> 

1578 IFX»i4THENQ0SUB128.PRINTe64.CH»(31);:QQSUB16i8 

1588 NEXT 

1598 PB=(H*E*188)*2et28:lFPS<=«mB«l68flELSECLS:PRIMT"IMSUFFICIE 

NT STAFF- :PRINT«CflNCEllftTIONS NOW CQHING IN":Z=l-PH/(PSH>:FORX" 

1T0N:P(X, i7)=FIX<P(X, i7>*Z> :NEXT 

1688 CsC+CS:G0SUB128:RETURN 

1618 PRINT»PR06I«1","UST PRICE", "UNITS SOLD", "SflLES": RETURN 

1628 a^:IFNaTHEN17SeELSECLS:PRIMTN»,*- SiUS HflNRGER'S CQHNEN 

TS-":PRINT 

1638 IFH»7T«NPRINT*SflLES ARE NORHMIV SUM IN JULV fM> flUQUST"E 

LSEIFH=lTHENPRINT"ft LOT OF PEOPLE MUST HRVE GOTTEN COMPUTERS FOR 

CHRISTHflS" 

1648 PRIHT"REIURNED «ERCHflNDISE":F0RX=lT0N:IFP<X,15)«P(X.5)+3)T 
HEN1728 

1658 IFP(X, 2KlTHENi72flELSEV=RNDG+14*P<X, 14) ) 
1668 YT=fIX(V*P(X,15>/188):PRINTfl<X),VTi" UNITS" 
1678 IFV<4THENP<X, 1)=P(X> 1)-VT :CL=a+VT/8:G0T01728 
1688 PR1NT"< D -DEBUG & REPLACE f -REFUND * CflNCa R -REPLACE 

>"i:G0SUB138:IFAA="D"THEN1698ELSEIFAR="$"THEN1788ELSEIFflft="R"TH 
EN1718ELSE1688 

1698 2=X:60SUB858:PRINT§448,CHR$(31)i .a=a+P(X,l)/3:P(X,l)=VT*- 
i:Q0T01728 

1788 C=C-YT*P(X, 4)*1. 4:a=a+P(X, l)/6+YT/8:F0RV=eT017:P(X, V>=8:N 
EXT : IFX=NTHENN=N-1 . GOT01728ELSEF0RV=XT0N : FOR2=8T017 : P( V, Z)=P< V+1 
, Z) :NEXT:NEXT:N=#-1:G0T01658 
1718 P<X, 1)=P(X> 1)-YT : CL=a+VT/8 • P<X, 8)=P<X> 8)-5 
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1720 NEXT 

1730 IFC<0flNDCV<50000THENPRIMT"W3UR CREDIT IS MOT GOOD. YOUR LOC 
flL LOflN SHflRK CHflRGES 25X PER HOMTH INTEREST!" C=C*1 25 
1740 IFC<0flNDCV>49999THENPRIMT"VOU ARE PRYING 24Ji INTEREST ON YO 
UR HORKIHB CflPITflL":C=C*1.02 
1745 GOSUB120 

1750 T=RND(35):IFT>NTHEN 1810 

1760 PRINT"COMPETITOR INTROWICES «H PRODUCT TO COMPETE WITH "; 
1770 PRINT ft(T).Tl=RM)(2):PRINT"NEH PRODUCT IS "i : IFTl=iTHENPRIN 
T"flBOUT ftS GOOD" ELSE PRINT"BETTER" 

1780 T2=RND(50)+75:P(T, 2>=P<L 2)-5. IFT2>P(L 2)THENP<L 2)=P(L 2)- 
(T2-Pa 2)) : IFP(L 2K40THEW»a* 2)=40 
1790 T3=INT(P<L4)+. 5):IFT3>8THENT3=5+RND(T>2) 
1800 T3=T3-.05;PRINT"IT SELLS FOR $"iT3:IFTl=lTHENP<L3)=T3ELSEP 
(L3)=T3*2/3 
1805 GOSUe 120 
^810 CLS/PRIMT"PRODUCT LINEVFOR T=lTON:PRlNT''<"iTi"> «ifl<T)i" I 
"iP<L4)*:NEXTT:PRINT 
1820 PRINT"<E>LIHINRTE ITEH <P>RICE CHRNGE <D>EBUG <C>ONTINUE 

1838 8OSUftLa:IF<flft=»E")OR<flft="P")OR<flfl='D">THBtt840 ELSEi©0 

1840 INPUT" ITEH NUMBER"; T : IFTaORr>NTHEN1890 

1845 IFflfl="P"THEN1878 ELSEIFflfl="D"THEN1880 

1850 a=a+P<T, 1)*P<T. 4)/4 : FORV=0TO17 : P(T, Y)=0 : «XTV : IR=NTHENN= 

N-lELSEFORV=nOH:ft<V)=fl<V+i) :FOR2=0TOi7:P<V, 2)=P<V+1, Z> :NEXT :NEX 

T:N=N-i 

1860 G0T01818 

1870 INPUT'NEH PRICE fi P(L 4) :Q&TO1810 

1880 2«T.GOSUB8S0:GOTO1810 

1890 &C-»a:RETURN 

1900 iFuaieonfQii990 

1910 PRIHT'VOU HRNE A WHLINB LIST DF *i Ui " NRMES. " 

1921 PRHfT*0O VQU WISH TO SB» VOUR CUSTOMERS R CHTflLOGUE 7'i M 

SUBi38:IFflR*1l"TNEH1990 

19% INWF'HQH MICH DO VQU UISN TO SPDf> »">Ul:CRsUl:IFUDU<»10 

TI€ltJl=tM0KUl-U*i0)/9 

1940 «t=f 1X<U1/(18««)> 

199eRETUat 



so 



The new word 
processor from 

Radio Shack! 




FEATURES: 



• Lower case capability • Total document formatting • Error correction by 
deletion, insertion, overwriting and exchanging • Automatic headers, footers 
and page numbers • Global find, repiace and delete • Operator- defined 
blocks for hyphenation and editing 

SCRIPSIT will produce letters or any text material. The 
documents ean l>e stored on disk for revision and update. 

REQUIREMENTS: 

e 32K Level II TRS-80; one or more disk drives; line printer 

If you've seen or used the Electric Pencil* you'll be delighted with 
SCRIPSIT's versatility and extra features. Rapid typists will 
appreciate the fact that SCRIPTSIT does NOT lose letters at the end 
of each line. Titles can be automatically centered. The Screen width 
can be changed to match your printer. Tabs can be set. etc... 

If you are a BASIC programmer, you'll want to utilize SCRIPSIT's 
ability to work directly with BASIC programs 

SCRIPSIT comes on disk with thorough documentation and 
sample text files. Includes three audio cassette tapes which cover all 
aspects of this exciting Word Processing Package. 

The Complete SCRIPSIT Package (with Binder, Manual. 2 Disks, 3 
Cassettes. Instruction Summary Card and special press-on key 
labels) is only $95.00 ^ $2.00 shipping. 

6 SOUTH ST., MILFORD, NH 03055 (603) 673-5144 
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INFINITE BASIC 

Adds more than 70 commands to BASIC that can be merged in any combination 
to make efficient use of memory/Includes matrix read, inverse, transpose, 
identity, simultaneous equations, scalar, vector, and multidimensional array 
arithmetiojdynamically reshape, expand, and delete arrays, change arrays in mid 
programTread and write arrays on tape, copy elements, zero and move arrays. 
String functions include left and right justify, truncate, rotate, text justification, 
string centering, delete and insert substring, pack string, convert upper and 
lower case, translate characters, reverse strings, verify function, test number of 
occurences, masked string searches, encrypt and decrypt string, compress and 
uncompress string characters. High speed sort routines for strings and arrays, 
including multikey sorts, are also part of this package. 

, '^ For business users, an add on package includes multiple precision packed 

r decimal arithmetic, with up to 127, digits of accuracy, binary search of sorted 

arrays, insert elements in sorted arrays, automatic page headings, footings, and 

pagination including forced end of page, and automatic hash for record 

retrieval. Infinite BASIC $49.95. Infinite business (add on) $29.95 

COMPROC COMMAND PROCESSOR 

Chain multiple steps in disk BASIC upon power up, relocatable key 
debounce, allows pauses for data entry at specified steps during^ 
execution (on cassette for disk systems only) for $19.95. 

DOSORT 

BASIC control program with" high speed machine language sort for disk 
users. Merge and sort files on more than one disk If you have 2 or more 
drives. Selt prompting with manual. Specify 32K or 48K version $34.95. 

GSF GENERALIZED SUBROUTINE FACILITY 

18 machine language subroutines with easy access for BASIC users. Sort 
1000 element arrays in 9 seconds, read and write arrays to tape, 
compress and uncompress data, move arrays in memory, duplicate 
memory, fast horizontal and vertical lines, 5 routines for screen control. 
Specify 16K, 32K, or 48K version, for $24.95. 



REMODEL PROLOAD 

BASIC program utility allows you to renumber portions of a program, 
move portions from one location to another, delete, merge, save and 
verify combined and changed programs, and create your own library of 
programs, subroutines, and even data statements. Works on tape or disk 
systems. Two programs on one tape. Specify 16K, S2K, or 48K 
(unspecified orders receive 16K) tape $34.95 
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TIMSER 

Time series analysis program fits data to 9 different 1st, 2nd, and 3rd 
order curves. Goodness of fit data, tables, projected data, confidence 
limits, curve fit, variance, correction factor, seasonal and cyclical 
variations, inflation corrections are all implemented. Detailed user 
manual with illustrated examples. Order tape at $14*95. 

Y-YBAR 

Optical system design program allows manipulation of ray heights at 
lens surfaces using Y-Y Bar diagram method. With documentation on 
tape for $14.95. 

DISK SORT/MERGE 
DSM IS POWERFUL!!!!!! 

• Sorts large multiple diskette files on a minimum two drive Mod-I disk 

system. 

• All records are physically rearranged — no key files are required. 

• Sorts random files created by BASIC, including files containing sub- 

records spanning sectors. 

• Sorts on one or more fields in ascending or descending order. Fields 

may be character, binary integer, or floating point. 

• The sorted output file may optionally have fields deleted, rearranged, 

or padded. 

• Sort commands can be saved for reuse in production applications. 

• Single sort, merge, or mixed sort/merge operations may be performed 

in a single DSM application. 

• Sorted output may be written to a new file, or replace the original 

input file. 
DSM IS FAST!!!! 
DSM is written entirely in machine language for fast sorting. $75.00 



TheSattware Exchange 

6 ScLithStKet.Box 68, Milfoid,NH 03055- 603-673-5144 



FRENCH 
"BONJOUR" 




LANGUAGE SALEr 



GERMAN 
'GUT MORGAN' 



SPANISH 
'BUENAS DIAS' 



LANGUAGE TEACHER SERIES FROM ACORN SOFTWARE 

These programs provide a whole disk full of vocabulary and 

conjugation drills to be used in conjunction with a course in 

the language. We have decided not to offer educational 

software, so while supply lasts, you can have them for $15.95 

«ch. Comes on diskette, requires 32K memory. 

^ TheSaH¥i/at^ Exchange 

X^. 6 SOUTH ST., MILFORO, NH 03055 873^144 
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NOTE: ST-80 tft t trademark 
of Lance Mlefclut, Inc. 



by Lance Mtcklus 



The ST-80 family of 
smart terminal packages 

Now you can have the right terminal paclcage for your 
communication needs! From ST-80 UC -- the simple, pre-set, 
inexpensive terminal program designed for users of THE SOURCEs 
MICRONET, and FORUM 80 — to the power and sophistication of ST- 
80 ill, The Software Exchange has the paclcage for you. 

All four programs include the ability to use an unmodified TRS-80 
Iceyboard to produce RUB, ESC, and other control characters for 
time sharing, software control of the RS-232-C board, repeat key, 
bell, software support for the three most common upper/lowercase 
hardware conversions, and line printer output. 

ST-80 UC 4K Level II cassette, $24.95 

This universal communicator program Is an easy-to-use timesharing 
program for the beginner. Special features include preset parity, word 
lengthy and baud rate (regardless of switch settings on the RS-232-C board) 
for THE SOURCE. MICRONET, and FORUM 80, automatic testing of the 
RS-232-C board, and even spooling of prepared messages on tape directly 
into FORUM 80 using a basic program supplied as a line listing. 

ST-80 4K Level II cassette $49.95 

The original smart terminal program for the TRS-80, ST-8Q lets you 
reprogram your RS-232-C board from the keyboard, and run at different 
baud rates. Does not have auto testing of RS-232-C or tape spooling. 



ST-80 D 32K disk program, $79.95 



Special features Include connection time clock, option of user-created 
translation tables for keyboard, gathering arwJ pre-formatting data to be sent 
directly from disk to host computer, spooling of received files to disk or printer, 
editing of received files, and auto logon. If you use it with VTOS 3.1 , you also 
get device driven I/O, job logging, and chaining. 

ST-80 Id 32K disk program, $150.00 
ST-80 D with extra utility programs 

JheSaih^re Exchange 

6 South Stf^t, Box 68, Milford.NH 03055 603-673-5144 — 
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Put IRV 
on your 

programming 
Staff! 



Com«t with manual 



Input shorthand — one keystroke 
can enter a whole line! The feature 
you liked in Level III BASIC and T-Short, 
now with all keys user programmable! 
You can even turn your cassette player 
on or off with a single keystroke. 



Relocate a line by simply editing the line 
number — renumber lines individuallyl 

Video Editor allows cursor oriented 
editing of your programs. Just move the 
flashing cursor to the line to be edited and 
type the corrections, insert, or 
delete! 

IRV is faster than Level II BASIC! 
More powerful than a speed 
typist! Abie to leap ten 
subroutines at a single bound! 





Maehin* langtiag* tap* $24.95 



On Disk $29.95 



• SOUTH ST.. MILFORD.NH030SS •79-S144 
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GALAXY COMBAT II 



by Phil Case 



You were on a routine 
assignment when it happened. 
While you were out charting 
asteroids, the entire defense fleet 
was being devastated by a massive 
Zargonian invasion. It happened 
so quickly that you didn't even 
receive any distress calls until 
after you returned — to find the 
entire fleet in ruins. 

The Zargonians are a humanoid 
race which lives across the star 
desert. They make long trips to 
raid the Inner Orbits every centon. 
If it wasn't for that one planet in the 
middle of a star desert, they 
wouldn't be able to make the long 
trek. 

The confederation had just 
developed a secret weapon to 
destroy the Zargonian base 
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planet, but now that the fleet has 
been destroyed, there is no way to 
stop the inevitable — the 
Zargonians will take over the Inner 
Orbits and turn them into another 
one of their slave systems. Already 
twenty Zargonian battleships have 
taken positions in the Inner Orbits. 
However, if you could somehow 
secretly visit the ten space stations 
scattered across the Inner Orbits, 
you could pick up the ten parts of 
the secret weapon. Once 
assembled, you could destroy the 
Zargonian Base Planet, and if 
extremely lucky, hunt down and 
destroy the Zargonian battleships. 
Can you meet the challenge? 

Here's your chance, the Inner 
Orbits is a solar system which Is on 
a 10x10 grid. Your goal is to attack 



and destroy the 20 Zargonian 
Battleships which have already 
taken position in the Inri^er Orbits. 
You must also visit the ten space 
stations, pick up the ten parts of 
the secret weapon and destroy the 
Zargonian Base Planet before 
another fleet of Zargonians cross 
the star desert. 

Warning!!! Your ship is a scout 
ship — not a battle ship; the key to 
your success is speed. You are 
much more mobile than the 
Zargonians, therefore you must 
work quickly to destroy them 
before they start firing at you — 
their missies carry a heavy charge. 
It is now up to you; if you fall, the 
system is doomed to become a 
Zargonian Slave System. Good 
luck!!! 
Playing the Game: 

This game is played in a fashion 
similar to the many STARTREK 
programs. Once started, the game 
is totally real-time. After selecting 
the difficulty level you wish to play, 
you will find yourself in the cockpit 
of an everyday, ordinary scout 
ship. 

First of all, let's review the 
instruments: 

1. In the upper center of the screen 
is the View Screen; this portal is 
used to visually view what is 
happening outside the ship and is 
the medium for activating the L-R 
Scanner. 

2. Below the View Screen is the 
Weapons Status Board; this is 
used for a quick reference to 
check on the operational status of 
the two weapons. 

3- At the bottom of the screen is 
the Communications Window. 
This instrument displays all 
incoming messages, onboard 
communications, and computer 
reports. 



4. In the upper-left corner is the 
Shields Status Indicator. This 
gauge is used to check on the 
amount of reserve power to the 
shield. (If this instrument shows 
either shield as being below 700 
units, it will automatically trip a 
warning message to the Com- 
munications Window.) 

5. Below the Shields Status 
Indicator is the Fuel Gauge. This 
tells you the amount of fuel you 
presently have onboard. Note: 
careful pilots always keep watch of 
this gauge. There is no excuse for 
running out of fuel. 

6. In the upper-right corner Is 
the Location Indicator. This 
instrument tells you your position 
in the galaxy in an X-Y coordinate 
fashion. X is the horizontal 
position and Y is the vertical 
position. Note: The galaxy is on a 
10x10 grid. Any attempt to leave 
the galaxy will activate safety 
systems which prevent you from 
doing so. 

7. Below the Location Indicator 
Is your Torpedoes Counter. This 
instrument simply tells you the 
number of torpedoes you have left 
on board. 

8. Below the Torpedoes Counter 
is an Enemy Counter which shows 
you the number of enemy ships 
left to be destroyed. 

9. There is one other instrument, 
the L-R (Long Range) Scanner. If 
you press the ENTER key, the L-R 
Scan will be displayed on the view 
screen. This scanner shows you 
what is In the four quadrants or 
sectors around you. After viewing 
this instrument as long as desired, 
press ENTER to go back to the 
External View, or, If desired, you 
can move directly from this mode 
and the view screen will 
automatically be reset. 
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Now that you know where 
everything is, If s time to play. 
First, you already know about 
activating the L-R Scan. So let's do 
so and see what we find. Was there 
an enemy ship In any of the 
quadrants around you? If so, press 
the arrow pointing in the direction 
you need to go to enter his 
quadrant; else go In any direction 
until something happens. 

If you are In a quadrant with an 
enemy ship, here is how to destroy 
him. First you need to center him 
on the "+"; otherwise you will not 
hit a critical portion of the ship and 
he will only be damaged. Once 
centered over the "+", press the 
(SPACE BAR) to fire your 
torpedoes. If you miss, correct his 
position and fire again. NOTE: You 
cannot retreat; once in a battle you 
fight to the end. As he fires you will 
see the torpedo get larger and 
larger until It shatters on your 
shields, if they are strong 
enough. Your cockpit will be 
destroyed if your shields are too 
weak to resist his torpedo. NOTE: 
Your Shield Status Indicator will 
be updated after each torpedo so 
that you will see how strong your 
shields are. One last thing — • your 
L-R Scanner cannot be activated 
while you are in battle. 

Now a little more about moving 
about. While you are in the search 
or exploratory mode, i.e., not in 
battle, you move from sector to 
sector by pressing the arrow of the 
direction you wish to move. You 
cannot press more than oiie arrow 
at a time. When you are moving 

— ~" — wm 



between sectors you see no stars 
because you are in a hyper-drive, 
which is faster than light. Once 
stopped in a given sector, the stars 
move because you are actually still 
moving about a central point 
within that quadrant. When in the 
Combat Mode, you use the arrows 
the same way, i.e., to move YOUR 
ship. Therefore, if an enemy sh jp is 
to the left of your targeter, you 
need to move to the left to move 
him jight, so, you press your left 
arrow. 

If, by chance or on purpose, you 
find a space station, the station will 
automatically guide you into 
docking, so you do not need to 
worry about doing this touchy 
maneuver. Once docked, your 
ship will be recharged; that is the 
number of torpedoes brought to 5, 
fuel tjrought to 100, and shields 
recharged to 3000 each. Also, if 
you have not visited this space 
station before, a piece of the secret 
planet killer weapon will t)e loaded 
on board. Once all ten pieces of 
the weapon are onboard the ship, 
you will be told the weapon is 
ready to use. NOTE: You can visit a 
space station any number of times 
to recharge. However each station 
only has one part of the weapon. 

If you run across the base- 
planet before your weapon is 
assembled, just go about your 
business until you complete the 
weaport — then return later to 
destroy it. 

YOU ARE READYll! GOOD 
LUCKll! • 
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' " a. ' — rp-| 

111 OBIiam iMnm :0FIIITR-Z:DII6(ll.ll):CLS:PMNTOI»<2I)i ■ 

GRUKHXmRT ir 

111 iB( INITIRLIS GfUMV 

115 S<9>9>«9:F0i)fMTQ2l 

US )M)»(ll);V^8O(ll>:IFS0CV>4QRS(X.V>>lTlelll6ELSE5(X.VM: 

lEXT 

117F(nMT0il 

118 )HSe<ll);V>«0(ll>:IFS(X.V)><9IKS<X.V)«ia50(.V>>jnfllllSLS 
E5<)CV)«3:ICXT 

119 )NMD(11) V>4MD(ll):IFS(X.V)HITie6flCVX:0I^:aP^:ELSE119 
131 REM INITin.IZE OVVHICS 

135 STf><TRINaK12>32>4GM»(l£lVtSTRIIOK8.3?>4aRt(144>4CII»<aS 
>4STRWBKK.24HCW>(129>»STItIiaKSi32)4CWK144H- 'HHtUX 
>4CHtt(161>K}ltK2S>«5TtIieKlL MXCIItKllS) 
141 Ef>Snnia»(27.32>40ltKX>4SmnK2^2«)4STinmi(27.32>H9* 
$(aS>«STIIiaK27. 24>45TIHIfil<27. 32>4CWf(XMSTinWH27. MHSIRI 
NBK27. 32) W-STRIIBK27> ISlHOKKXHSTRliaKZ?, 2«>«51tnM<27 
. 191)«a«X26M5Tin«l<27. 2*>4$TRinK27, 191>4Cllii(2S) 
191 IMiN5TtIIBK27,2«H5TRnQI<2r.iM»^^5nmei(9^32>4CWtl<i 
6i>4CHtK17S>4STIim»(9i i4D40M<17(>ta«<i44)45TtnBK3. XHS 
Tn»»(% 24)4CMt»(13D«a«K13t>«5mnKSi 141)4ClltMOI>KNtlCl 
29) 

IM PKlX»«K2(>«5TRIIBK8.32>»OtM191Xtl(*(129>4Clltta2XH 
M(138)KWI<199)KI«Kl«7>4STIIiaNl. 32>4dM<131>4CI«f(10)KH 
lil<aS)«STnnKlL24)40«KSC5XiaK14«H- *4CMtl<17})4€IM(14 
»♦■ Naitl<139V»Of(K161)«Qf»(lS«) 

17t Pf<2)<HRK2S)^STRIMK&32)KM(»(191VKtltK129)4Cltt(179)4€ 
»«K143>40«K1«)4> ■Ktl»<l»MaitKlfi9>4CWI<2SV»STRIinKt 
L24>4atK165)4CMRK144)4€ilil<138)KI«K188H* ■H3«X139)4* 
■KMiKlfil>KWK154) 

181 PfG)*CMtK2(V»STinNBK&32>4a«M19D4€lltl<179)4Cllit(143)4C 
)M<145)«' *4CHll<iaD40tKlfi9)4atK2(>«SnnmMlL24Xlt 
t<lS5)40«K194)4€MtK18»V ■4ClltK139H* 'KHtKlfiD^OItKl 
94) 

191 fK4X»fit<2S)*STRINBK8>32)4CW*(19D4CI«Xi43)4CI«l<145H* 
■-HHIKiai>tCWI<10)4CMtl<2S)«SltlIIBI<ll. 24>KMtl<175>K3< 
n<181>«' ■4CHtK139>^ ■40ltKlCiy»CMtt<194) 
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2MPK5Xlfit(2S)4STRIteKa32>Klltt<19B)Klltl(145H" '^C 

Mif (138)40fil(189)40«|(26)4STRINQI(lL 24)4CII»(173)4€IM<144)*- 
'4afif(139)*' ■4Clfil(ia)4CMR>(t39) 

21BP«(6)<MRt(2S)4STRINQI(8>32>4Clfi$(lSe)4Ctfit(129H* '*C 

ll»<191)40«$(189)40fif (26)*STRINQI(1L 24)4CtM(l£5)4Ci«f (144>4C 
iKM39)** ■KHtl(178)«Ofil(i») 

211 SRt<TRINBK4.136)«STRINGI(3,lfie)45TRIN»(13,25)4STRIN»(3.1 
44)«STRIIOI(4. 132)40lit<26)-^STRINQt(2ik 24)40I»(191)4CHR»(131»S 
TRINQI(9> 179)4CHR«(m>4afM(191)«Clfit(26)*5TRINQI(13. 24)4Cti»(l 
91>40fit(176>4STRING$(9> 179)4Clfi$(17S)4Clfi»(191>«Ct«f (26) 

212 SM-Sftl*STRIN»(2e.24)*STRINGI(4,13S)«STRlNQiai38)«STRIN» 
(13. 25>«5TRINQI(3, 129)4STRINGI(4. 132) 

213 SB><afi«(129)«STRINQI(3.132)«5TRINQI(3.144)*STRINI»(13.25)4S 
TRING»(3. ia)>STRINGI(3. 136)4CHRI(13e)4Ctii»(2fi)^STRINQI(2B. 24)>' 

■4Ctfi*(188)45TRINQI(9. 14e)K»l»(188)*- ■4CR$(26)«STRINQI(13. 24 
)♦■ ■4CHRI(143)«STRINQ»(9.14t)4ai»(143)«' ■Klli»(26) 

214 SB>«SBI*STRINGI(2l.24)KHRt(144)«5TRINGI(3.132)«STRIittl(3.12 
9)^TRING»(13> 25)4ST1{INQI(3. 138)45TRINQK3. 136)4CHRI(1£B) 
22iPf(7)>0«$(26)>STRINQI(8.32)4CHM(l»)4CHR$(129)4' 'MM 
M(175)40«l(143)«Oit*(185)4a«tf (26)«STRIIffi»(lL 24)KMR»(165)«CH 
Rt(lS5)«* ■4C»l»(138)4afi$(188)KII»(154) 
238Pf(8)<t«*(26)«STRINQt(8,32)40SI(19i)4CMtl(129>f' '*Cm 
S(175)«OI»(143)40Kt(147)40fit(169)4€}lil(26)^STRINQI(ll,24)4€W 
l(1iS)4Ctfil(144)f ■4€t«»(138)4€llit(188)4CIRI(16e)4Clftf(lS4) 
:OCtl»(24)40fi$(136)4€HR>(143)4CI«$(172) 
24ef>l(9)>Oltt(26)4ST1HNQI(8i32)4€t«K19l)«Ctl»(129)«* 'fOfil 
(175)4CHR»(143)4<aM(149)«C»lil(138>4CI«Klfi9)4CMRt(2()4STRINQI(l 
t24)4Ct«t(l£5)4a«f (144)4- ■4aft»(138)KI«X18e)*' ■4C»Rt(16 
•>«Clfit(154) 

291 Ft<l«K26>4ST1»NGI(13.25)4Clfi»(176)4CI«»(2S)4STRINQK4.24)4 

CWf(176)40M(14e)40M(131)4Ctlil(25>4CWX131)4Ctl(l(14t)4Clli»( 

17S)4CHRt(aS)«5TRINQI(18. 24)4Ctlit(17S)4€t«t(14l>4CMil(131)4S1RIN 

ei<7.25)KMtl(l}l)40«K14l)4Cllil(17S) 

M NKlXMO(aS>45TRINBI(13.25)4C«*(14l):IIK2)^3«K2()«5TRIN 

CiK12> 25)45TRIIBK3. 191) :IIK3)»5mNBI<ll> 25>«5TRmat(S. ITSVKM 

t(26)«STRmBKS. 24>4STRDBK9. ISDKMRMaO^STRMBKS. M)«5TRINB 

K&131) 

271 NK4)>STinNBKlll25>45TRn0K7«18eHCIIIK2()45TRimK7.24)4S 

TinNBK7. 191)KWil(26)45reiinia. a4)45nninK7. 143) III(5)«STRINB 
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1(4, 32)4€l«ta79V»5TRINQI(2, 17S>4CIM(14e)4aitl(196)451inNBK9. 3 
2)KMi»(lX>4ai»(14l)4Qllfa76H' ■4CMM(lS2>4Clfli(131)4Cllit(2 

29e NI(5)^ll(5)t511lINQI(17,24>4ClltK141)4ai»(148>4aitl(lS3>«5TR 
INBt(2. 179)KI«XlM)4CH{»(134)4CII»(169)4Clfi*(17S>4CHn<186H* 
■«GIMri31)-iOlt*(04>4Clf»(26)«STRINBI(ia 24)4CW*(ia)4ClllKl 
M)4CWf(176)*CHRI<144H' '4CMtl(149H' • 
298 NI(5>>m<5)4Clfil(14«>4S1iniOK2,179)KWI<177H* ■^OltKia) 
4CI«$<177)4STRINe»(2.14e)«Clfi$(166>4Clfil(l»H' ■KHRKITSHCWI 
(144)4CNRI<26)«5TRIIOK2& 24)KHit(16i)KlltK134)4C«»(131)45TRI 
¥aKZim)MHtUm>HAtnm)*' ■«CMif<138) 
3M NI(5M»(S>4Clfil(131>KIM(129)«' ■KWt»<lM)4S1inmi<2.140) 
4CIIW131H- ■4Clfl»M36)4QM(141>4CI«l(134)4ai»(i3i>4CI«l(l 
68)Klli»(133) 

US S*(l><»f(2S>«5TRINB»(9,32>4Clltl(l€l)45TRINBK3.18e>4ClltMl 
»>45TRINBI(3. 18e)40lif (18IV»Ct«f<2SH5TRI«l(a SD^SISIMK?. 13 
lVia«t(129)Sf(2>>' ■♦STRIIOI(23,176)4CWM26)45nnNQK29.24H 
STRINQK^ 18e)4STR1MQI<9. 191)<t«KlSl>4CWt<lfi3)4CII»(131> 
12I St(2>«S»(2)«5TRIN0»(11.191)«5niNBI(2.18e)4CH»(2S>45TRmBI< 
27. 24)«ST1{INQI(2. 131>«5TinNBK9. 191>4ClliKl»)«STIlIIIII(2, 188)451 
RIIBI(1L191)4STRINGK2.131)'SX3>»- '45miinK7.188Klfi»<132H 
" OOOCINQ ■«CtfiK13S)«STRINBI<7.188H* '4aM(2(>«SmNBK27>24) 

338 SM3><t(3)*' ■«STinNBI(7.191)4Clftt(149H' •Kt«Kia>4Qir 

t(19S)40«»(188>«- ■KIM<162)«STinNBI(7,lMH* ■KI«»(2S)«STI) 

I«K27.24H- ■4STRINBI(7.191)4CHtl(132H' "4aM<138)«Smi»l 

<2,13l)** ■♦C«l<136)457RIIOI<7,191H' ■4CWK20 

335 SK3)«S»(3)4ST«1N8I(27.24H- '♦S1RIN»(7.143)4a«t(129H' 

m •4CHll(138VtSTMNBW7.143H' ' 

348 Si(4XI«f (2SH' ■4CI«l(178)4€lli»(f31)4Q«Kl<»H* "KIKK 

198)40«K131HaitK148>KWI(168VKaii>(131>4Climi37)4* '^OfiK 

18i>4ClftK134>4' ■4CWI(183)4Cllit<147)«* ■4Ctl)f(191>4ai)t(131>4C 

MiK14e)4CI«l(26)4$imNQI(28, 24)«CWt<138) 

398 SK4)*St(4)4a«l(148)4€NRK134>«* ■40li»(137)<K3ftl<148)«CII)f 

(129)4CMIia38>4CIM(148)«C>l»<134H* ■40M(133>4€I«»(137H- *♦ 

C»«f(141)4CMR*<148)*- ■40l»(141)4Cifi»(148)40«t(129) 

339 ' HfCMINE LflNQUmE WITE-OUT (HI) 

3S8 NI>CI«l(33)4CI«K8>40ltKaKlllf<94>4CI«»(191>KMit<17>4CI« 

l(l)40KI(68V»CI«|(l)4aC*(295)4CI«t<3>40ltt(237>4a«l(17SVia«» 



(201) 

365 PP=146:X$=STRirfi$<il,32>:Xlf=Xt+« ":aS:II*llT"ENTER DIFFiat 

TV LEVEL (1-20) " ; LP : IFLP<lORLP>20T«N365ELSeLP=22-LP : ttS 

m ir^-Sm : LS=20^ : TP=5 : fC=20 : G0SI.IB5^ ; KlSliSlWl :PRINT§89, " VI 

EW SCREEN "; :PRINT§OL " SHIELDS "; :PRINT8195, " IJ>PER "; :P 

RINT§259, X$; ;PRINT§323, " LOWER "; PRINT?387, m PRINTKilS. » 

FIEL: "; :PRINTKi79,Xi:i:PRINTM77,» LOCATION "; 
375 FU=ie«:«=9:VC=9PRINT§402,STRINCil(27,179)i $1=402 
380 PRINT§241, Xl*i • PRINT§369. " TC»?PEDOS "; • PRINTW33, Xl$; : mu 
T§561, " « 0^ EfCMV '.: :PRINT§625,Xl*i :PRINTK30,E$; PRINTggK, " C 
WMJNICfiTIOWS; "; ;PRINTe899,STRIN6$(58,32); :PRINT§533, "ICfiPCWS S 
TftTLIS mm"; :PRINT?658, "TORf^DOS"; :PRINTi722, »affl€T KILLER"; 
390 PRINT§679, "RE«)V"; :PRINT§739, »f«T REflDV"; •GOSliS500:PRINT§59 
4,STRII«a;(27,»=»)i 
480 ' STf»?T LOGIC LOOP 
418PRINT§PP,E*; 
10^ IFS(HC,VC)=560SLe56«e 
10Ki IF«=0««!S(OI,W')=0TJ€N70M 
1100 IFS(W;, VC)=30RS(fC, VC)=2TI€f03Sl.ie6ie« 
12W IFS(W::,W;)=iaiSUB6280 
2900 IFFU=0(]OT(K000 
2985 IFPEEK(14400)>lTHEN308e 
2910 PRINT0H>, E$i : PRINTiPP, ST$; : RESTORE 

2950 REftDRl. R2:G0SUB58W:RE«)S1, S2G0SUe5^l:RESET(Rl, R2) •SET(S1 
,S2> 

2960 IFPEEK(14400>=lTHEMa}SUB2M«; :GOTO2910 
2999 IFPEEK(144W)<2THErG950 

3080 IFPEEK(14480)=8TI«<W:=VC+1:IFVC>10THENVC=10; 009165^8 
m.9 IFPEEK(i4400)=16THEWC=VC-l;IFVC<lTWWC=l:GOa^900 
^0 IFPEB((144M)=32T)€NHC=W;-lIFW;<iTHENHC=l;G0SlJ85^ 
3038 IFPEEK(14408)=64TI€l«C=HC+l:IFHC>10T»CNHC=10:GOgJK900 
3050 GOSUB5800 
3180 FU=FU-3:IFFU<0THEW^U=0 
4999 GOSU8K0e:QOTO40e 

5888 Il=VflRPTR(«*) : I2=PEEr(Il+l) • I3=PEEK(I1+?) : 1FI3>127TH0II3=I3 
-256 

5001 0EFUSR8=I3*256+I2 

5002 X=USR<0); RETURN 
5180 PRINTtl46;E$i : RETURN 
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5200 PR1NTW46, i»i : RETURN 

5im FrjRfl=lTOie PRINTS, m; ■GCiSUBf«00PRINT»>P,EI,; NEXT RETURN 

5400 (a]iSUe5M0:FOI^lTO20-L=USR(ft) ■Ff*B=lT05:(em:aSF«^lT(B 

■fCXT:ffiXTfl:RETJI?N 

S«e PR1NT§261,US; :PRINT§289, LS; :PRlNT§241fC;";";VC.: :PRINT§437, 

TP; :PRINTK82,FLIi ■PRINT^29,f€; RET!.«N 

5600 t€$="SEN93RS REPORT T^T THE ZfRGWIfW BfiSE Kf^T IS NEW I 

N VIEW. ":GO9.85700:PRiNT»>P,P$i :PRINTffP,P$<i); :IFPK=1TI€NIC$="V 

OIK PL«€T KILLER mPOH IS RE«A' TO USE ! ! ' PRESS T« <SPflCE Bfl 

R> TCfFIffi. "■aaiB5700 

5610 IFPK01T>€W€*=»IC(W»«V REPOTS THftT THE PLP9CT KILLER STI 

LL f€EDS flW)ITI(Ml P«?TS. AND IS WSl (PERfiTKMl ":MSLe5?^ 

%M IFPK=1GOTC^«80 

5630 F(»fl=lT09: PRINTER, P$(R); (30516^6: IFPEEK(144Mi)<>0T^€fWI 

NTiPP, El; : RETU?N : ELSEfCXTfl : GOTO5630 

K80 F0Rfl=lT09:(»Sl^^PRINTW,P$<fl)i :IFIM<EVf=CHR*(32)THE»» 

TIK685ELSENEXTfl :SIT(]6680 

5685 PRINTS, Ft; ;IFRND(5)=lTI€lffiOSLe5308:l€$="SENSORS REP»:T TH 

flT THE ZflWXWIftN E«SE PLfWET WS BEEN TOTflLV DESTROVED "M&m 

7^ :S<fC,VC)=8: RETURN 

56% PRINTIPP, El; :PRlNTiPP, PI; rPRINTIPP. Pl(fl); ;G0T(B6^ 

5700 l€l=STRIN«5l(54, 12)+ICI+STRIN6I(55, 32) :F0Rfl=lT0LEN<fCI)-54:P 

RINTi899, MIDKICI, ft 58); .GOSIB5800:NEXTft;l€l="" :RETU»< 

5800 PRINTgSI,CHRI<179); :SI=SI+i :IFSI>428THENSI=4K^ 

^8 PRINTKI..CHRK191); RETURN 

59W «EI=»f«VI(»TI»l COMPUTER REPORTS VOU HfiVE TRIED TO LEflVE TH 

E GflLi^V Omfm SffETV SYSTEMS TfiKE OVER AM) PREVENT THIS. ": 

Q0Sl«57^:RETIIi!N 

60^ MEI=*ENGII«ERIf« REPORT: t€ fiRE OUT OF FUa AND DOOMED TO 
FLOAT IN SPfCE FORE«R'"»:GOa^700;ICI="THE (»E HILL AUTOHflTI 
CALLV START AGAIN IN 18 SEOWS • :GOSUB5700:GOTO7010 
6100 PRINT8PP,Eli :NEI="SENSORS REPORT A SPflGE-STATION IN THIS QU 
ADRANT. ":G(»JB5700;PRINT8f>P/SI<l); :MEI="SPfCE STATION TO SCOUTSH 
IP: HE HAVE VOU ON SCANNER AND ARE PULLING VOU IN ON TRACTOR B 
EAMS.'':GOSUB5700 

6110 FOR2A52TO4:FORB=lTO50:GOSLe5800:NEXTB:PRIHTiPP,Ef; :PRINTePP 
,SI(ZA);:NEXTZA 

6128 PRIHT§675, " "; FU=108:US=3000:LS=3000;TP=5:HEI=»EN6INEERI 
N6 REPORTS SHIP IS BEING PREPARED FOR COMBAT ":G0SUB5788:G0SU855 
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6138 IFPKOiflHDS(HC,VC:)=3THEMME$="fl PIECE OF THE PLflMET KILLER H 
EflPON IS NOW KING LOfiOED ON BOflRD. ":S<HC,VC>=2:PK=PK-1;IFPK=-10 
TI€NPK=I;PRiNT8739, " "; :rC*="THE PLANET KILLER HEflPON IS WW ft 
SSEMft.ED ftND REflOV TO USE. " 
6140 GOSIJB5t0e:PRINTff>P,E*; : RETURN 

6200 PRINT8PP,E$; :HE*="HftRNlN6: ft ZfiRGONIflN BftHLESHIP IS IN TH 
IS eURDRflNT, PREPftRE FOR fiTTftCK!!!":GOSUB5?0e 
6210 PG=(RND<4)+1>'»64:PH=RND(24)+19:PS=PG+PH:PRINT8PP,E$; :PRINTi 
222,"+";;PRINTePS,C*; 
6215 X=RND<LP) : GOSUB5800 ; IFX=iaHU^»0 
6217 PO=PS 

6220 IFPEEK<14400)=eTHEN6215 
6230 IFPEEK(14400>=8flNOPSG00TtCNPS=PS+64 
6235 IFPEEK(14400)=128THENFR=1:IFPS=223THENHT=1 
6240 IFPEEK(14400)=16flNDPS>192THENPS=PS-64 
6250 IFPEEK<14400)=64flNDPS>147flMDPS<172THENPS=PS-l 
. 6251 IFPEEK(14400>i64flNOPS>21iflNDPS<236THENPS=PS-l 

6252 IFPEEK<14400)=64f»IDPS>275flNDPS<300THENPS=PS-l 

6253 IFPEEK(14400)=64flNDPS>339THENPS»PS-l 

6260 IFPEEK<14400)=32««»PS<1?1THENPS=PS+1 

6261 IFPEEK(14400)=32flNDPS>210flNDPS<235TJCNPS=PS+l 

6262 IFPE£K(14400)=32fM«»S>274ftNDPS<299T^CNPS=«+l 

6263 IFPEEK(14400)=32flNOPS>338flHDPS<363THENPS=PS+l 

6299 IFTP<1THENFR=0:HT=0 

6300 IFFI^1THENPRINT0PP, Fl; -tTPsTP-l ■FR=0 

6320 FU=FU-l;IFFU<lTHENPS=PO:FU=0:IFTP<lTHEH6325aSEPRINTW00, "C 

ONDITION a?ITICfiL- H3UT OF FUa"; 

6325 GOSUKi^ 

6340 IFTP<1PRINT0675,"NOT"; :PRINT§900. •CONDITION GRITieflL—-- 

~N0T0RPED0S";:IFFU<1PRINT" ORFl€L"; - • 

6350 IFHT=lTHENGOSUe53i0:NE=NE-l:S<HC,VC)=0;HT=0;GOSUB5500:RETUR 

N 

6500 mm¥9, E$; : PRINT§S3. "+".: : PRINT0PS. C$; 

6999 G0T06215 

70^ PRM»>P.E$; :«E$=»Rfi0I0 fCSSWl — COMH 

m HE«)91W?TERS; Vftl WNE JUST OESTRtWED THE LftST OF THE ZflRGO 
NIflNS AND SftVED THE CONFEDERATION. '•:QOSUB5700:ME*="THE GAME HILL 
fftJTOmTICALLV STf«T fttS^IN IN 10 SECONDS. ■":GOSUB5700 
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7818 FORft=iTO30e :G0SUB58ee : NEXT : RUN 
8888 X=RND(i888) :X1=RND(2) :IFXi=lTfCNVmJSELSEVU=LS 
8818 IFX>VI.ITHENE=4n.SEE=5 

8828 F(«2ft=lT0E:F0RBZ=lT018(»SUB5888;NEXT:PRINT§PP,«$<2ft)i :NEXT 
2ft:lFE=4G0SUB5488:aS:INPUT"V0U HflVE BEEN DESTROVED BV Tl€ 2WK0 
NIAN FIGHTERf VOU ARE DEAD I <*m*mm*****m*mmm****^^ 
■M*M*i*»«^^ ENTER TO PLfiV «3fiIN";fiRL« 

8828 IFXl=lTHEW.IS=llS-XaSELS=LS-X 
^32 Q0SUKi588 

8825 PRlNT§PP,E$i :PRINTiPS,CI; :IFTV=8flNDLS<78e0RTV=8flNDUS<7e8Tf€ 
W€$="DflNffiR : SHiaOS ARE LOW " ' " : G03JB5788 : TV=1 
8848 fSTLRN 

18888 IFERR/2+l=22THEW>0KE16526, PEEK(Vffi?PTR<fK)+l) :P»:E16527, PEE 
K(VflRPTR<M$>+2) : RESUME l€XT . 

imi5 f«STORE:RESU« 

18818 DftTffel, 12. 61, 12, 61, 12, 68, 14, 68, 14, 59, 14, 48, 12, 47, 12, 73, 11, 
74, 12, 59, 14, 58, 15, 47, 12, 46, 12, 74, 12, 75, 12, 68, 18, 68, 9, 58, 15, 57, 16 
, 46, 12, 45, 12, 75, 12, 76, 12, 68, 9, 69, 8, 57, 16, 56, 17, 45, 12, 44, 12, 76, 12 
,77,12,69,8 

18828 DfiTfl78, 7, 56, 17, 58, 15, 44, 12, 42, 12, 77, 13, 78, 12, 78, 7, 71, 6, 42, 
12, 42, 12, 78, 12, 79, 12, 71, 6, 61, 8, 42, 12, 41, 12. 79, 12, 88. 12, 41, 12, 48, 
12, 88, 12, 81, 12, 48, 13, 39, 13. 81, 13. 82. 13, 39, 13, 38, 13, ^, 13, 83, 13, 3 
8, 13. 37, 13, 82, 12, 84, 14, 27, 12, 36, 14, 36, 14, 48, 9, 84, 14, 85, 14 
18838 DflTfeS, 14, 86, 14, 86, 14, 87, 14, 87, 14, 88, 14, 88, 14, 89. 15, 89, 15, 
61,8 

28^© PRINT§PP,E$i :IFS(W;,VC+l)=5THENfil$=" BASE PLANET "ELSEIFSC 
HC, '<i'C+l)=30RS(HC, VC+l>=2THEf«l$="SPACE STATION"ELSEIFS<»C, VC+1)= 
1THENA1*=» ENEMV SHIP •ELSEIFS(HC, VC+l)=a3RS(HC, VC+l)=9T«Nftl*= 
"EMPTV SECTOR" 

28810 IFS(HC,VC-1)=5THENA3*=" BASE PL»CT •ELSEIFS(tC, VC-1)=^)RS 
(W:,VC-1>=2THEI«2$="SPACE STATI0N"ELSEIFSCIC,VC-i;)=lTI€NA2*=" EN 
EHV SHIP "ELSEIFS(HC-W:-l)=0a?S<He,VC-l)=9THENA2*="EMPTV SECTO 
R" 

20828 IFS(HC-l,VC)=5THEf«2$=" BASE"+CHR*(26)+STRING$(5,24)+»aAN 
ET"ELSEIFS<JC-l,VC)=20RS<fC-l,VC)=2THENA2$=" SPACE"+Cf«»(26)+STR 
ING$(6, 24>+"STATI0N»ELSEIFS(HC-l. VC>=lTHENfe$=» EffiHV"+CHR$(26)+ 
STRIN6$(6,24>+" SHIP" 

28820 IFS<HC-1, VC)=8«?S(HC-1, VC)=9THENA2$="EMPTV"+CHR$(26)+STRIN 
G$<:5,24>+"SECT0R" 
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2W48 IFS<HC+l,VC)=5fflENfl4$=" BRSE"4CHR$<26)+STRI«l(3*(5.24)+"PLfW 
ET'aSEIFS<HC+ivVC)=30RS<HC+LVC)=2"mENfl4«=« SPflCE'+CHRt<26>+STR 
IMW(6. 24)+*STflTI0N»ELSEIFS(HC+l, VC)=1THEMR4*=- EMEMV+CHRKafi)* 
STRING$<6,24)+" SHIP" 

28850 IFSCHC+L VC>=80RS(HC+1, VC>=9THENfl4$=»EMPTV"+CHR$<26)+STRIN 
e$<5,24)+"SECT0R" 
28868 PRINT8153,fMl*; :PRINT8219,ft2«i :PRINT?345,fl»; :PRINTI238,fl4l 

i 

29070 IFPEEK<14400)<>0THEHPRINT0PP,E$i : RETURN :aSEGOSie5800:PRIN 
TfPP,Sfl*i :GOSUB5800:PRINT0PP,SB$; ;GOTO20070 




by Roger W. Robitailie; Sr. 

Rough and tumble gridiron action, from the toss of the coin to 
the 2-minute warning... four 15-minute quarters, provisions for 
interceptions, touchbacks, time- 
outs, fumbles, penalties. 

Everything except ^^s^--O^B8P i / 1 ^Sr^97 ^Wi 

the cheerleaders. 




Level II, 16K 

Price, $9.95 



SMware Exchaitge 

6 S(xHhStr(KH, Box (y8,MiltordNl / (W55 (i()Hy7A-5144 



The High Plains TRS-80 User's 
Group, Amarillo, Texas meets 
the second and fourth 
Tuesdays of every month at the 
Downtown Branch of the 
Amariilo Pubiic Library, 413 
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East Fourth Street, 7:00 to 9:00 
p.m., annuai dues are $15. For 
more information write: P.O. 
Box 30545, Amariilo, Texas 
79120. 




A Wargamer's delight! Throw away your pencils, 
charts* and dice. Let the computer do the dirty work 
while you concentrate on strategy. Kriegspiel II is a 
much improved, two-player version of the original — 
with machine language routines for extra speed. 

Select one of 9,999 scenarios including towns, tanks 
and terrain. Choose the number of mountains (up to 
200), then 5it back and watch as the computer 
generates your 31 x 32 game board, sets up the pieces, 
the towns/the mountains and a river. 

Even the weather will become an important factor 
as play proceeds. To win, you must enter the Capitol 
City of your opponent (or reduce his fighting strength 
below half of your own)/ 

KRIEGSPIEL II — Level II 16K $14.95 

(cassette version only) 

♦Combat Resolution Tables, Basic Turn Allowances, Terrain Effects 
Charts, etc. 



6 SOUTH ST.. MrLFOBD. N.H. 0305S (603) 673-5144 
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THE 




BlB/imnk^! 



Now there's a true historical wargame for your home computer. Computer 
Bismarck accurately simulates the epic battle t>etween the awesome German 
battleship and the British Home Fleet. Best of all, the computer program 
eliminates the drudgery of paper and pencil wargames — remembering all the 
rules and details while keeping track of the battle on a North Atlantic map on 
your video display. 

Play the Computer 

It maneuvers the Bismarck and Prinz Eugen so well that you'll have to 
command the British ships brilliantly to avoid losing your vital merchant 
convoys. 

Play a Human 

The two of you plot your strategies in grease pencil on an off-screen 
mapboard while the battle is fought on the video screen (monochrome or 
multi-color depending on your display capabilities). You deploy battleships, 
cruisers, carriers — each with unique and realistic operating parameters. You 
must deal with all the variables which challenge an actual battle commander 
firepower and damage; shadowing ability (better in radar-equipped vessels); 
and visibility — which depends on weather, which varies with geography and 
time. 

Level n. 16K TRS-BO cassette. $49.95 
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6 SOUTH «T^ MILFORD. NH 03051. 07M144 




APL80 

Improved Disk version now includes Monadic 
and Dyadic Transposition, choice of dimension, 
format, latent expressions, and )COPY 

APL80, a large subset of the powerful, 
mathematically elegant APL language of the IBM 
5110.. .you can create matrices with up to 64 
dimensions and manipulate them with over 60 built-in 
functions and six different kinds of user defined 
functions. Syntax of functions is identical with the 
IBM version. 

16K Level II Tape version $14.95. Enhanced 
Disk Version $39.95 (32K 1 disk). Book 
APL: An Interactive Approach by Gilman 
and Rose $15.50 plus $2 shipping. Send 
SASE for data. 

IteSoMtare Exchange 

SouthStreet:Box68Mlford,NH 03055 603-673-5144 



Remember the Good Old Days? . . . 
You can recapture them ! 




Level I in Level 



by APPARAT 

Level I BASIC interpreter loads In top 
4K of any 16K Level II TRS-80, 
Allows unmodified load, run, and 
CSAVE of Level I programs — no 
conversion hassles! Great for teach- 
ing beg ijriners, young and old, to 
program in BASIC. 

^ iy , J / \. ''System" tape for Level II, 16K — $15.00 

ThcSafiwM^ Exchange 

6SouthStKet,Box68,Milfoid,NH03055 603-673-5144 
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A Library of 
Information 




The 

SoHwate ExcH^ngle 



LITTLE BOOK OF BASIC STYLE by John M. 
Nevison. ideal reference for BASIC programmer, 
junior high to research scientist, indexed, 
Illustrated, 151 pages. $5.95 plus $1 shipping. 

Z-80 INSTRUCTION HANDBOOK by Sceibi Pub- 
lications. Convenient pocket-size manual describes 
Z-80 capabilities in easy-to-understand terms. 
Designed as a practical reference to mnemonics, 
machine codings, usage, for programmers of every 
level— beginner to professional— anyone working 
in Z-80 machine or assembler language. 
Appendixed. $4.95 plus $1.00 shipping. 

THE BASIC HANDBOOK by Dr. David A. Lien. A 
definite reference/Idea book. Explains over 50 
favorite versions of the BASIC language in detail as 
used In micros, minis and mainframes. 
Users/Learners Manual. 360 pages. $14^95 plus 
$1.00 shipping. 

TRS-80 INTERFACING by Jonathon Titus. What 
you need to know to connect your TRS-80 to the 
world. Assumes knowledge of some machine 
language programming. $8.95 pfus $1.00 shipping 

INTRODUCTION TO TRS-80 GRAPHICS by Don 

Inman. Set and reset graphics only, $9.95 plus $1 .00 
shipping. 

Z-SO SOFTWARE GOURMET GUIDE AND 
COOKBOOK by Scelbl Publications. Over 100 
usable subroutines, plus how to use them. $14.95 
plus $1.00 shipping. 

PATHWAYS THROUGH THE ROM. The definitive 
guide to Level It BASIC. Includes Super Map by 
FuUer Software, The TRS-80 Disassembled 
^tendbook by Robert Richardson, HexMem by d. 
PhitWp. and 2-80 i:>isassembfer by G. Blank. $19.95 
ptus $1 .0& shipping. 



TO 



z-80 AND 8080 ASSEMBLY LANGUAGE 
PROGRAMMING by Kathe Spracklen. The best 
introduction to assembly language we sell. You 
should have experience in BAStC. $7.95 plus $1.00 
shipping. 

SCELBI'S SECRET GUIDE TO COMPUTERS. This 
book will turn you into a computer expert quickly 
and easily. You'll learn BASIC, having fun every step 
of the way. The book explains how to deal with 
computer machinery, which buttons to press, and 
trains you to write many kinds of programs. The 
author's "underground" style of writing is sure to 
hold your interest. This book contains 150 sample 
programs, analyzes them and gives you hints on 
how to invent your own. Charts are given comparing 
the different computers. $5.95 plus $1.00 shipping. 

TRS-80 DISK AND OTHER MYSTERIES by Harvard 
C. Pennington. If you are serious enough about disk 
programming to own RSM-2D or NEWDOS+, then 
you ought to purchase this book, it explains the 
organization and features of TRSDOS 2.0. 2.1, 2.2, 
NEWDOS, and VTOS, tells you how to use 
Supenzap, RSM-20. Monitor 3, Debug. Dircheck, 
and LMOffset, explains the directory track on the 
disk, file structure Itncluding Electric Pencil files), 
and even gives detailed procedures for recovery of 
lost data. While this book is not recommended for 
the inexperienced user, it is essential for the serious 
disk programmer. The book is expensive, in 8V^ by 
11 format with typewritten instead of typeset 
printing, and only 130 pages, yet the information is 
worth the price. $22.50 plus $1.00 shipping. 

Order 

TOLL FREE 

1 -800-258-1 790 

bi NH can 673-St44 
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STAD 



Hie tool ?f you need to unlock 
v^ the / power of the Z-80 

A powerful monitor for the TRS-80 with speciai abiiity in Tracing and 
Debugging. Single Step through machine language programs or set up^to 
three breaicpoints, and look at this display format! 

flF BC DE HL IX IV flF' BC' DE' HL' SP PC 
8844 8888 C888 B77C 6433 FFFF 8182 0868 4888 3FC0 41FC 4488 
4468 LD R.93 



• • • 

AH the power of 
regular monitors as 
well. Look at these. 



A FIRST(O) LAST(FFFF) 

A FIRST 

B 

BVALA 

B VALA VALB(O) 

C 

D FIRST(O) LAST(FFFF) 

E FIRST(O) 

F FIRST LAST VALUE 

G BRKPTS (3 max.) 

H FIRST LAST VALUE 

I PORT 

K 

L 

L SECTOR MEMORY COUNT(I) 

M FIRST LAST BLOCK 

N 

NO 

N VALUE 

N FIRST 

O PORT VALUE 

P 

P ENTRY 

P FIRST LAST 

Q FIRST LAST 

R 

S FIRST LAST OPTION(O) 

T COUNT 0PTI0N(6) 

U FIRST COUNT OPTION(O) 

V FIRST LAST BLOCK 

W SECTOR MEMORY C0UNT(1) 

X FIRST LAST BLOCK 

Z FIRST LAST VALUE(0) 



ASCII dump 

formatted ASCII dump 

start of branch table 

display in decimal 

hex arithmetic 

check system tape 

dump hex 

edit memory 

find byte 

set breakpoints, continue 

find word 

read port 

keyboard echo 

load system tape 

load from disk 

move memory 

display symbol table 

symbol table to tape 

define value for symbol table 

define start symbol table 

write to port 

initialize memory blocks 

write memory blocks and start 

define a memory block 

calculate checksum 

display / modify registers 

disassembler 

trace instructions 

unformatted tape I/O 

verify memory 

write to disk 

exchange memory 

zero memory 



* •• 

16K, 32K, and 48K 
/versions on one 
cassette for $24.95 

Use from tape in 

Level 11 or as a 

command f He from 

Disk. 



The SoHware Exchange 

6 SOUTH ST., MILFORD, NH 03055 (603)673-5144 



Get the most 

challensing of aD 
adventures! 



ff^Qsofr 




Requires one disk, 
32K $29.95 



A£> VENTURE 



From Microsoft, the people who wrote 
BASIC for all the personal computers, comes a 
version of the original Adventure. NOW, you 
no longer need a PDF- 10 for all the power of the 
original game! 

This game fills an entire diskette. Endless 
variety and challenge as you seek to rise to the 
level of Grand Master (until you gain skill, there 
are whole areas of the cave that you cannot 
enter.) 



6 SOUTH ST.. MILFORD, N.H. 03055 (603) 673-5144 
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The Lazy Man's 
Shortcut to 

[achine 




A BASIC Compiler in BASIC! Run your source program in 
BASIC, compde it into FAST Z-80 Code and execute the compiled 
version —.all without reloading. 26 integer variables, GOTO, 
GOSUB,END,REM.RND,LET,+,*./,IF,THEN,ELSE,< .=, > , 
INKEYI, CLS. PRINT®, CHR$, PEEK, POKE. Compiled programs 
may be saved via TAPEDISK. 

Supplied with game program, '3D TIC TAC TOE", which uses all 
of the TINY COMP Statement set and is ready to compile. 

^4anual includes several sample programs as well as thorough 
documentation of the Compiler for those who like to know Trow 
things work'' and for those who might even wish to EXPAND on 
TINY COMFs capabilities. j^^ version: $19.95 

Disk version: $24.95 



6SouthStreet,Box68Mlford,NH03055 6CW-67i-5M4 



TS 




TOLL FREE 
1-800-258-1790 

IN NH CALL (603) 673-5144 



mMB 

TIIS-83 0psr8 Ttiiatre 

Magnificent sound! by Richard Taylor 

level H.16K........ ............$9.95 

^sllsngs 

Word game with sound by Richard Taylor 

Level II. 16K... $9.95 

Opsra Thsstrs Rus Cliallengs 

ondisk.32K..... ....$19.95 

Iridp Challsnpr 
by Personal Software 

level IU6K...... ....,......$14.95 

innnim 

by Chris Freund 

levelll, 16K, $9.95 

Disk. ....................$14.95 

X-Wing RgHtarlt 

by Chris Freund 

levelll. 1SK...... .....$9.95 

TSlp8B 

by Art Cant 11 " . 

Levelll, 16K. .....$9.95 

StrgoR Chess 

by Dan and Katfte Sprackten 

Level II. 16K..... $19.95 

Saraonii 

by Dan and Kathe Sprackten 

Levelll. 16K....... ...................$29.95 

Ams^n'Msns 

by Robert Wallace < 

Levelll. 16K $7.95 

Snsks Eggs 

With sound by Leo Chrlstopherson 

LeveHI.ISK $14.95 

UfeTwo 

With sound by Leo Chrlstopherson 

Uvelll,16K $14.95 

AfldreM Nim 

With sound by Leo Chrlstopherson 

LeveMI, 16K... $14.95 

fissWsry 

With sound by Leo Christopherson 

levelll. 16K............... ................ $14.95 

74 



Msstsrmind II 
by Lance Micklus 

Levelll, 16K ....$7.95 

Tysoon 

by David Bohike 

levelll. 16K $7.95 

9 Games for Frtschaei Chltdran 
by George Blank 

Levelll, I^K.. $9.95 

End zona U 

by Roger W. Robitaille 

Uvelll. 1«K. $9.95 

SpaeaBaftias 
by Lever IV 

Level II, t6K tape $14.95 

32K disk... ......................... .....$19.95 

Star trek 

by Lance Micklus 

Level n.16K $14.95 

Advanuiras on Tape 
by Scott Adams 

Levelll, 16K. .,.$14.95 

Choose one: 

Adventureland: Magical beinos, perils and puzzles! 

Pirate's Cove: Clue in a bloodsoaked book. 

Mission impossible: Foit the saboteur, save the 
reactor! 

The Count: Protect your neckt Who do you think lives 
here? 

Voodoo < Castle: Remove the curse from Count 
Cristo. 

Strange Odyssey: The ruins of an ancient alien 
culture? 

Fun House: Taktis all your brains to get past the gate! 

Pyramid of Doom: Wati;h out for the Nomad! 
Mventuraa on Disk 
by Scott Adams 
$39.95 for three-game combinations: 

1) Mission ImpossiWe, Pirate's Cove, Adventureland 

2) Voodoo Castle, The Count, Strange Odyssey 
$24.95 for two-game combinations: 

3) Fun House, Pyramid of Doom 
Advaniura Ssfflpter 

by Scott Adams 

Mini-version of Adventureland, serves as introduction 

Levelll, 16K.. $5.95 



Pork Barrel 

by George Blank 

Level H,16K.... $9.95 

Barricade 

by Small Systems Software 

Machine Language ..... $9.95 

Pentominoas ; 
by James Garon 

Level II, 16K ..,.$7.95 

Mean Checkera Machine 
by Lance Mtcklus 

Level II, 16K tape $19.95 

Disk. ...:................................ $24.95 

Kriagaplal 

by Ron Potkin 

Level II. 16K . .... .... ..... .... ......... . . . . . $7.95 

TImaTrak 

by Joshua Lavlnsky 

Level II. 16K. ....$14.95 

Kamikaze 

by Russell Starkey 

Uvelll. 16K... $7.95 

Wordo 

from Microfantastic Programming 

Level II, 16K $14.95 

Micro Ciieas 1.5 

Level I or II. 4K.... $19.95 

Faatgammon 

from Quality Software 

Leveni, 16K. $19.95 

Cribbaga 

by Roger W. Robitaille Sr. 

Level II, 16K...... ......$7.95 

Gaiactic Empire 
by Doug Carlston 

Level II. 16K...... .....$14.95 

Gaiactic Trader (a sequel) 
by Doug Carlston 

Levelfl, 16K... .........$14.95 

Galactic Trader and Dnpire 

ondisk32K ...$29.95 

Air Raid 

by Small Systems Software 

Level I or II. 4K........ .....,..........$9.95 

Loat Qutelifflan'a Gold 
by Teri Li 

Level II. leK...... ,...........$9.95 

Original Advantura 

by Microsoft as piayed on PDP-10 

^KdiSk.. ......$29.95 

PIgakIn (Football) 
by Acorn Software 

Level II, 16K... $9.95 

PROogHgM 
by David Bohike 

Level II, 16K....... ...$7.95 

Ting Tong 

from Acorn Software 

Machine Language, with sound 

Level II. 16K ........,$9.95 

Journay to the Cantar af the Earth 
by Greg Hassett 

Level II, 16K $7.95 

Sea SoftSlda en caaaftHa for addi- 
tional gamoa 

SUSINESS 
tnvontof y Syatem 11.3 

byM. Kelleher 

Improved version $79.95 



inventory's' 

by Roger W. Robitaille, Sr. 

LevetTl,16K tape .....$24.95 

32K disk/without Invoicing $39.95 

with Invoicing $59.95 

Payroll 

by Stephen Hebbler 

Disk32K,.:, ,.$39.95 

Appointment Log 
by Michael Kelleher 

Level II. 16K... $9.95 

MailUatii 
bySBSG 

32Kdlsk .\.......j .$99.95 

Smalt Buainess Bookkeeping 
^ by R.W. Robitaille. Sr. 
Level II, 16K with journal 

disk .$36.95 

tape .... , $31 .95 

without journal 

disk ....$29.^ 

tape ., $24.95 

On Line kivoicing 

by Stephen Hebbler 

1 disk, manual; 32K, 1 drive, line 

printer. .'. $39.95 

Accounts Rocaivabie(with invoicing) 

by Stephen Hebbler 

3 disks. 2 manuals; 32K, 2 drives, line 

printer $69.95 

CCA Data Management System 

from Personal Software 

Ready for transfer to disk, with manual 

Tape $74.95 + $2 

SPECm PURPOSE 
Hiatograph/Scattergram 

by Gary BreschinI 

Levelll, 16K ....$9.95 

Tiny Comp A BASIC Compiler in BASIC - 

by David Bohike 

Tape $19.95 

Disk ..........$24.95 

RPN Calcutator 
by Russell Starkey 

Level H,16K.. .$9.95 

flam Radio 

by Michael Kelleher 

Levelll, 16K .....$9.«5 

Nam Radio 

Advanced version for 32K 

disk.... .........$24.95 

Electronic Assistant 
by John Adamson 

Levelll. 16K.,... ,,.....$9.95 

Basic Slatistiea 
by Steve Reisser 

Levelll. 16K $9.95 

Magic Paper Caleuiator 
by Russell Starkey 

Levelll. 16K. .$14.95 

Keyboard 80 (improved) 
by John Adamson 

Levelll. 16K .$9.95 

Toxt-80 

by Frank B. Rowlette. Jr. 

32K disk systems $59.95 
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Electric PwicH 

by Michael Shrayer 

Powerful machine language word processing systenn 

Level II. 16K tape , $100.00 

disk $150.00 

Pencil Pal 

by Microcomputer Specialists 

Fiequires 32K, 1 disk system, Electric Pencil, and lower 

case modification kit. . . . ... $35.00 

Dyntmie Data Base 

by Ken Knecht 

Manual and 3 programs on disk for 32K or larger 

systems with one or more drives $39.95 

PERSONAL 
Typing Tutor 
by 80 US 

Level 11, 16K ; ....$19.95 

Secrets of the Tarot 
by John T. Phlllipp 

LevelH, 16K......... .....$9.95 

tChfng 

by John T. Phlllipp 

Levelli, 16K $7.95 

Numeroiogy 

by John T Phlllipp 

32Kdisk : $14.95 

Bierhythms 

by Frank B. itowlette. Jr. 

Level II. 4K.... $4.95 

Personat Finance 
by Lance Mickius 

Levelli, 16K $9.95 

Ailvsncetf Parsonai Hnance 
by Lance Micktus 

32Kdlsk.. $24.95 

Home Rnancfat Management 
by Michael Kelieher 

Levelli. 16K..... $9.95 

Pertodicat Cross Reference 
by Dave Stambaugh 

Levelli. 16K $14.95 

32Kd}sk $19.95 

HMH 

bvBillSholar , 

mdrsk. ...$19.95 

urruTiES 

T-Btort 

by Web Associates 

Levelli. 16K $9.95 

m 

by Robin Mork 

Level II. 16,32. and 48K 

cassette $24.95 

disk ...$29.^ 

APL-80 

by Phelps Gates 

Deluxe version— 32K disk, instructional material book 

.,. $49.95 + $3 

Level II, 16Ktape-^reduced features, no course or book 

$14.95 

Book (separately) .'. $15.95 -t- $3 

File Manager 80 
by Nepenthe 

32Kdisk ...V $49.95 

Automated Qisic Directory 

by George Blank 

32K disk, requires NEWOOS $14,95 
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STAO 

Trace and Debug Monitor for tape and disk systems 

16, 32 and 48K on one tape $24.95 

MEWDOS by Apparat $49.95 

MEWDOS+byApparat.. ...$99.95 

NEWOOS 80 by Apparat ......$149.95 

RSM2 by Small Systems Software 

Uvelll, 16K $26.95 

ifSM20 by Small Systems Software 

Disk for 16-48K on one tape $29.95 

KVPby Lance Mickius 

Tape $24.95 

Disk....... $29.95 

KVP 232 by Lance Mickius 
KVP adapted for the TRS-232 

Tape $24.95 

ST80 Smart Terminal 
by Lance Mickius 

Levelli, 16K $49.95 

ST80D Smarter Terminal 
by Lance Micktus 

For Disk ..........$79.95 

STBO-UO dedicated to THE SOURCE 
by Lance Mickius 

Levelli, 16K $24.95 

STBOtIi 

by Lance Mickius 

$150.00 

Micro Text Editor 
by Don Coons 

Level II. 4K or 16K $9.95 

Uvel Hi BASIC 
by Microsoft 

$49.95 

Level i in Level ti 
by Apparat 

Levelli. 16K $15.00 

FORTRAN 
by Microsoft 

32K.2disks $80.00 + $2.50 

Assembler 
by Microsoft 

32K $80.00+ $2.50 

FORTRAN Plus Assembler. $150.00 + $5 



Will print an ASCII file to a parallel line printer at the 
same time you are using your computer for another 
prosram. For 32K disk systems only. Will NOT work 
with NEWDOS (2.3 or VTOS 3.0 OK). 
Disk....... $24.95 

Cross Reference Utttlties 

by Lance Micktus 
Level II cassette versions 

XREF $19.95 

RENUMX (XREF with RENUMBER and rescue after 

reset) $24.« 

RENUMBER separately $7.95 

RX— Cross Reference for Disk 

by Lance Mickius 

32K, 1disk .......$24.95 

RENUMBER 

by Lance Mickius 

The lull-featured RENUMBER program. One version 

now works in 16K, 32K or 48K. $7.95 

System Copy 

by Kal man Bergen 

Levelli, 16K ....$9.95 



Hoppy Disk Diagnostic 

by Dave Stambaugh 

Disk with manual $24.95 

BOOKS 

Sargon Handbooic 

by Dan and Kathe Spracklen 

$15.95 + $1 

Tlie BASIC Handbook 
by Dr. David A. Lien 

$14.95 + $1 

Z-8Q Instruction Handbook 
by Sceibi Publications 

$4.95 + $1 

The Little Book of BASIC Style 
by John Nevison 

.....$5.95 + $1 

THS-80 Assembly Language 

Programming 

by William Barden, Jr. 

$3.95+$1 

APL — An Interactive Approacfi 
by Gilman and Rose 

$15.50 + $3 

Introduction To TRS-80 Grapiiics 
by Don In man 

$7.95 + $1 

Learning Level 11 
by Dr. David A. Lien 

$15.95 + $1 

Z-BO Software Gourmet Guide and 

Cookbook 

from Sceibi Publications 

$14.95 + $1 

TRS-BO Disk and Otiier Mysteries 
by Harvard Pennington 
$22.95 + $1 



TRS^ interfacing 

by Jonathan Titus 

::.... $&95 + $1 

Secret Guide to Computers 
by Russ Walters 
$5.95 + $1 

SUPPLIES 

Cassettes: Boxes of 10 each 

C-10 $6.50+$1 

C-20 $7.50 + $1 

Diskettes: 

Dysan (premium quality) 

Box of 5 $29.95 + $1 

BASF 

Box of 5 $24.95 + $1 

Box of 10 $39.95 + $2 

Box of 20 f$69.95 + $2 

Case of 100 $299.00 + $3 

Diskette Storage Box $5.00 + $1 

Floppy Armor™ 

Protective envelopes for shipping 

floppy disks. 

5 pack $4.95 + $1 

Z-80 Chip Poster $3.99 + $1 

SoftSide VInyf Binders $4.95 + $1 

Tape Recorder Alignment Kit 

$9.95 +$1 

IMPORTANT 

■ No sales tax. 

■ All C.O.D.'s or special delivery orders are 
a minimum of $5 for special handling. 

For more detailed descriptions of our soft- 
ware and supplies send for the TSE Catalog 
- it's FREE! Write or call today for your 
copy: 



7M0VING? 

TO CORRECT OR CHANGE 
YOUR ADDRESS 

Attach label from your latest copy here 
and print new address below. 



NAME: 



ADDRESS: 
CITY: 



STATE: 



ZIP: 



MAIL TO: The Software Exchange, PO Box 68, Mllford, NH 
03055 
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ISB Order Form 

Special prices in effect 60 days from mailing 
DESCRIPTION MEMORY LEVEL PRICE 
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ADDHANOL 


NGCHA 


RGE 


$1.00 


ADDITIONAL CHARGES 




TOTAL ENCLOSED 

Check VISA 


WITH Of 
Master C 


lOER 

harge 





THE SOFTWARE EXCHANGE 

6 SOUTH STREET MILFORD, NH 03055 
Order toil free: 1-800-259-1790 on nh can 673si44) 

Level II software available on disk for a $5.00 (per order) medium charge. This 
extra fee is for any number of programs transferred to disk from tape when you 
brder. If the order exceeds the capacity of a single disk, we absorb the fextra 
cost. 

Be sure to include handling charge and any additional charges when figuring 
your total. All orders shipped within 48 hours. 

All prices are subject to change without notice. We are not responsible for 
typogrsphicsl errors, Inetudlno incorrect prices. 



Money Order mmim 

ALL 30FTWARE GUARANTEED TO LOAD AND RUN. If you experience 
difficulties, simply return the tape or disk for free replacement. Send to the 
attention of Bette Keenan, Customer Service Representative; please 



Charge card account number 



Signature.. 



Exp. Date Inter. # :.....,. 

Charge customers: Please fill in account information above and below 



Name., 



Address.. 
City 



.State . 



.ZIP.. 



ALL SOFTWARE SOLD ON AN AS-IS BASIS WITHOUT WARRANTY. TSE 

assumes no liability for loss or damage caused or alleged to be caused directly 
or indirectly by equipment or products sold or exchanged by them or their 
distributors, including buf not limited to any Interruption in service, loss of 
business or anticipatory^rofits or consequential damages resulting from use or 
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POB0X68 

Milford, NH 03055 

'*your BASIC Mftwar^ magazine" 

Rush me the next 12 issues of SoftSide. 



le. 



DUSA bulk. $18 1 yr. n$32-2 yrs. DCANADA/MEXICO $25 1 yr. 

DUSA first class $25 1 yr. DOVERSEAS airmail $30 1 yr. 

DAPO/OVERSEAS surface $25 1 yr. Telephona your charga.eard order! Call 

^^^ our Subscription off ice Monday through 

Credit Card - w&^ Friday 9:30 to 5:30 (Eastern time) at 

mmm 1^00-258-1790 (in nh can 673-5144) 



Exp. Date. 
Signature. 

Name 

Address -^ 
City _ 



Interbank # {SA/C only) 



-State - 



-Zip- 



Please remit in US funds ONLY 



Ready to get serious? SUBSCRIBE TO PRQG/SQ the magazine 
dedicated to serious programmers. ,: beginners to professionals 



SUBSCRIPTION RATES • 6 Issues per year 

USA Canada 

Bulk mail -$15.00 Mexico $21.00 

First Class Mail - $21 .00 APO/ FPO 

Overseas airmail - $27.00 Overseas surface mail 



] 



D Check /Money Order enclosed D Master Charge D VISA 



SIGNATURE, 
ACCOUNT #« 
EXP. DATE_ 
NAME 



INTER. # 



ADDRESS, 



CITY^ 



STATE 



ZIP 



Telephone orders accepted for Master Charge or VISA accounts. Call Monday through 
Friday, 9:30 to 5:30 EST at 1-800-258-1790 (In NH call 873-5144> 
PO BOX 68, MILFORD, NH 03055 
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in this tsme: 

Micro Millionaire 

Run your own software publishing company 

Galaxy Combat 

Assemble the "Planet Killer" weapon 
before time runs out 

Simple Sound Interface 

Build this one yourself for less than half the 
price 

Printing Calculator 

Maintain eight separate accounts 
NumbagelS Not tor the Illogical 
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